diff options
author | Oleg Pykhalov <go.wigust@gmail.com> | 2018-06-08 13:46:43 +0300 |
---|---|---|
committer | Oleg Pykhalov <go.wigust@gmail.com> | 2018-06-08 14:58:33 +0300 |
commit | ae9e5d6602544390fa5da0a87450405ebba012fd (patch) | |
tree | b5ad93d8cac6f4ec639aa7744c0a660189568f06 /guix/scripts | |
parent | 0b2fd1600fa719ab537f4fa57fc021d233a752e8 (diff) | |
download | gnu-guix-ae9e5d6602544390fa5da0a87450405ebba012fd.tar gnu-guix-ae9e5d6602544390fa5da0a87450405ebba012fd.tar.gz |
import: utils: Add recursive-import.
* guix/import/cran.scm (cran-guix-name, cran-recursive-import): New
procedures.
(recursive-import): Remove procedure.
* guix/import/utils.scm (guix-name, recursive-import): New procedures.
* guix/scripts/import/cran.scm (guix-import-cran): Use
'cran-recursive-import' procedure.
Diffstat (limited to 'guix/scripts')
-rw-r--r-- | guix/scripts/import/cran.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/guix/scripts/import/cran.scm b/guix/scripts/import/cran.scm index d65c644c05..30ae6d4342 100644 --- a/guix/scripts/import/cran.scm +++ b/guix/scripts/import/cran.scm @@ -99,8 +99,10 @@ Import and convert the CRAN package for PACKAGE-NAME.\n")) `(define-public ,(string->symbol name) ,pkg)) (_ #f)) - (reverse (stream->list (recursive-import package-name - (or (assoc-ref opts 'repo) 'cran))))) + (reverse + (stream->list + (cran-recursive-import package-name + (or (assoc-ref opts 'repo) 'cran))))) ;; Single import (let ((sexp (cran->guix-package package-name (or (assoc-ref opts 'repo) 'cran)))) |