aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEric Bavier <bavier@member.fsf.org>2015-02-13 21:34:40 -0600
committerEric Bavier <bavier@member.fsf.org>2015-02-18 23:53:46 -0600
commita0c2c4b45bb9c7b77f2b9a1562e791f1124cf93c (patch)
tree85f43958c85a065baf537bc5b37f35b195ef0610
parent2491d58962b67c7397147a75a005e78ba6312ec4 (diff)
downloadguix-a0c2c4b45bb9c7b77f2b9a1562e791f1124cf93c.tar
guix-a0c2c4b45bb9c7b77f2b9a1562e791f1124cf93c.tar.gz
import: cpan: Sort inputs.
* guix/import/cpan.scm (cpan-module->sexp)[convert-inputs]: Sort returned list of inputs.
-rw-r--r--guix/import/cpan.scm27
1 files changed, 16 insertions, 11 deletions
diff --git a/guix/import/cpan.scm b/guix/import/cpan.scm
index 307681b6ce..bd48c44b1a 100644
--- a/guix/import/cpan.scm
+++ b/guix/import/cpan.scm
@@ -141,17 +141,22 @@ META."
(#f
'())
((inputs ...)
- (delete-duplicates
- ;; Listed dependencies may include core modules. Filter those out.
- (filter-map (match-lambda
- (("perl" . _) ;implicit dependency
- #f)
- ((module . _)
- (and (not (core-module? module))
- (let ((name (guix-name (module->dist-name module))))
- (list name
- (list 'unquote (string->symbol name)))))))
- inputs)))))
+ (sort
+ (delete-duplicates
+ ;; Listed dependencies may include core modules. Filter those out.
+ (filter-map (match-lambda
+ (("perl" . _) ;implicit dependency
+ #f)
+ ((module . _)
+ (and (not (core-module? module))
+ (let ((name (guix-name (module->dist-name module))))
+ (list name
+ (list 'unquote (string->symbol name)))))))
+ inputs))
+ (lambda args
+ (match args
+ (((a _ ...) (b _ ...))
+ (string<? a b))))))))
(define (maybe-inputs guix-name inputs)
(match inputs