public/nixpkgs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

gnupdate: Remove unused variables.

Browse Source 
* maintainers/scripts/gnu/gnupdate.scm (gnu?): Don't bind unused fields
  in `match'.
  (ftp-server/directory): Ditto.

svn path=/nixpkgs/trunk/; revision=22454
This commit is contained in:
Ludovic Courtès 2010-07-04 21:10:17 +00:00
parent 073c01503a
commit f740342ade
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
maintainers/scripts/gnu/gnupdate.scm
View File

@ -522,7 +522,7 @@
;; Return true if PACKAGE (a snix expression) is a GNU package (according ;; Return true if PACKAGE (a snix expression) is a GNU package (according
;; to a simple heuristic.) Otherwise return #f. ;; to a simple heuristic.) Otherwise return #f.
(match package (match package
(('attribute _ attribute-name ('derivation _ _ body)) (('attribute _ _ ('derivation _ _ body))
(any (lambda (attr) (any (lambda (attr)
(match attr (match attr
(('attribute _ "meta" ('attribute-set metas)) (('attribute _ "meta" ('attribute-set metas))
@ -572,7 +572,7 @@
(values server (if (not subdir?) (values server (if (not subdir?)
directory directory
(string-append directory "/" project)))) (string-append directory "/" project))))
(else (_
(values "ftp.gnu.org" (string-append "/gnu/" project)))))) (values "ftp.gnu.org" (string-append "/gnu/" project))))))
(define (nixpkgs->gnu-name project) (define (nixpkgs->gnu-name project)