diff options
author | Ludovic Courtès <ludo@gnu.org> | 2010-07-04 21:10:17 +0000 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2010-07-04 21:10:17 +0000 |
commit | f740342aded9d22fe532d14a84660915b71c7f9e (patch) | |
tree | 16f5ced271c7137c62b4532a264591fb8e20c7a7 /maintainers/scripts/gnu | |
parent | 073c01503af284bc4114cffdb83e5df0a7e4f32f (diff) | |
download | nixlib-f740342aded9d22fe532d14a84660915b71c7f9e.tar nixlib-f740342aded9d22fe532d14a84660915b71c7f9e.tar.gz nixlib-f740342aded9d22fe532d14a84660915b71c7f9e.tar.bz2 nixlib-f740342aded9d22fe532d14a84660915b71c7f9e.tar.lz nixlib-f740342aded9d22fe532d14a84660915b71c7f9e.tar.xz nixlib-f740342aded9d22fe532d14a84660915b71c7f9e.tar.zst nixlib-f740342aded9d22fe532d14a84660915b71c7f9e.zip |
gnupdate: Remove unused variables.
* maintainers/scripts/gnu/gnupdate.scm (gnu?): Don't bind unused fields in `match'. (ftp-server/directory): Ditto. svn path=/nixpkgs/trunk/; revision=22454
Diffstat (limited to 'maintainers/scripts/gnu')
-rw-r--r-- | maintainers/scripts/gnu/gnupdate.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/maintainers/scripts/gnu/gnupdate.scm b/maintainers/scripts/gnu/gnupdate.scm index 6d8cf18df912..82c924e19fa8 100644 --- a/maintainers/scripts/gnu/gnupdate.scm +++ b/maintainers/scripts/gnu/gnupdate.scm @@ -522,7 +522,7 @@ ;; Return true if PACKAGE (a snix expression) is a GNU package (according ;; to a simple heuristic.) Otherwise return #f. (match package - (('attribute _ attribute-name ('derivation _ _ body)) + (('attribute _ _ ('derivation _ _ body)) (any (lambda (attr) (match attr (('attribute _ "meta" ('attribute-set metas)) @@ -572,7 +572,7 @@ (values server (if (not subdir?) directory (string-append directory "/" project)))) - (else + (_ (values "ftp.gnu.org" (string-append "/gnu/" project)))))) (define (nixpkgs->gnu-name project) |