diff options
author | Ludovic Courtès <ludo@gnu.org> | 2017-03-14 11:19:21 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2017-03-14 11:19:21 +0100 |
commit | 3b2dc9edcda19666623cc62dc3df2235b797f1b9 (patch) | |
tree | c22e58049facaf2e9db6367b93ac0cf1961682a8 | |
parent | 28958b646fb38a679e45d3c9d8257e46deebe190 (diff) | |
download | guix-3b2dc9edcda19666623cc62dc3df2235b797f1b9.tar guix-3b2dc9edcda19666623cc62dc3df2235b797f1b9.tar.gz |
upstream: Avoid '_' as a pattern variable in 'match'.
* guix/upstream.scm (lookup-updater): Don't use '_' as a pattern
variable.
-rw-r--r-- | guix/upstream.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/upstream.scm b/guix/upstream.scm index 2334c4c0a6..a47a52be3f 100644 --- a/guix/upstream.scm +++ b/guix/upstream.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2010, 2011, 2012, 2013, 2014, 2015, 2016 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2010, 2011, 2012, 2013, 2014, 2015, 2016, 2017 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2015 Alex Kost <alezost@gmail.com> ;;; ;;; This file is part of GNU Guix. @@ -131,7 +131,7 @@ correspond to the same version." "Return an updater among UPDATERS that matches PACKAGE, or #f if none of them matches." (any (match-lambda - (($ <upstream-updater> _ _ pred latest) + (($ <upstream-updater> name description pred latest) (and (pred package) latest))) updaters)) |