nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

import: cpan: Sort inputs. 

* guix/import/cpan.scm (cpan-module->sexp)[convert-inputs]: Sort returned list
  of inputs.
This commit is contained in:
Eric Bavier 2015-02-13 21:34:40 -06:00
parent 2491d58962
commit a0c2c4b45b
1 changed files with 16 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
guix/import/cpan.scm
View File

@ -141,17 +141,22 @@ META."
(#f (#f
'()) '())
((inputs ...) ((inputs ...)
(delete-duplicates (sort
;; Listed dependencies may include core modules. Filter those out. (delete-duplicates
(filter-map (match-lambda ;; Listed dependencies may include core modules. Filter those out.
(("perl" . _) ;implicit dependency (filter-map (match-lambda
#f) (("perl" . _) ;implicit dependency
((module . _) #f)
(and (not (core-module? module)) ((module . _)
(let ((name (guix-name (module->dist-name module)))) (and (not (core-module? module))
(list name (let ((name (guix-name (module->dist-name module))))
(list 'unquote (string->symbol name))))))) (list name
inputs))))) (list 'unquote (string->symbol name)))))))
inputs))
(lambda args
(match args
(((a _ ...) (b _ ...))
(string<? a b))))))))
(define (maybe-inputs guix-name inputs) (define (maybe-inputs guix-name inputs)
(match inputs (match inputs