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:
Ricardo Wurmus 2017-03-28 15:54:10 +02:00
parent 2dca8b2d51
commit 1a75083b0d
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 3 additions and 3 deletions

View File

@ -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))))