import cran: Print package stream in the expected order.
* guix/scripts/import/cran.scm (guix-import-cran): Reverse list of packages.
This commit is contained in:
parent
2dca8b2d51
commit
1a75083b0d
|
@ -1,6 +1,6 @@
|
||||||
;;; GNU Guix --- Functional package management for GNU
|
;;; GNU Guix --- Functional package management for GNU
|
||||||
;;; Copyright © 2014 Eric Bavier <bavier@member.fsf.org>
|
;;; Copyright © 2014 Eric Bavier <bavier@member.fsf.org>
|
||||||
;;; Copyright © 2015 Ricardo Wurmus <rekado@elephly.net>
|
;;; Copyright © 2015, 2017 Ricardo Wurmus <rekado@elephly.net>
|
||||||
;;;
|
;;;
|
||||||
;;; This file is part of GNU Guix.
|
;;; This file is part of GNU Guix.
|
||||||
;;;
|
;;;
|
||||||
|
@ -99,8 +99,8 @@ Import and convert the CRAN package for PACKAGE-NAME.\n"))
|
||||||
`(define-public ,(string->symbol name)
|
`(define-public ,(string->symbol name)
|
||||||
,pkg))
|
,pkg))
|
||||||
(_ #f))
|
(_ #f))
|
||||||
(stream->list (recursive-import package-name
|
(reverse (stream->list (recursive-import package-name
|
||||||
(or (assoc-ref opts 'repo) 'cran))))
|
(or (assoc-ref opts 'repo) 'cran)))))
|
||||||
;; Single import
|
;; Single import
|
||||||
(let ((sexp (cran->guix-package package-name
|
(let ((sexp (cran->guix-package package-name
|
||||||
(or (assoc-ref opts 'repo) 'cran))))
|
(or (assoc-ref opts 'repo) 'cran))))
|
||||||
|
|
Loading…
Reference in New Issue