From a689c85af4752b3fc466489e06d49ccab5f37de1 Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Fri, 4 Dec 2020 12:27:29 +0100 Subject: import/cran: Fix calls to CRAN->GUIX-PACKAGE. * guix/import/cran.scm (cran->guix-package, latest-bioconductor-release): Invoke CRAN->GUIX-PACKAGE with #:REPO keyword argument. --- guix/import/cran.scm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'guix/import') diff --git a/guix/import/cran.scm b/guix/import/cran.scm index d8240a6b2f..d6baa6b5e5 100644 --- a/guix/import/cran.scm +++ b/guix/import/cran.scm @@ -578,13 +578,13 @@ s-expression corresponding to that package, or #f on failure." (case repo ((git) ;; Retry import from Bioconductor - (cran->guix-package package-name 'bioconductor)) + (cran->guix-package package-name #:repo 'bioconductor)) ((hg) ;; Retry import from Bioconductor - (cran->guix-package package-name 'bioconductor)) + (cran->guix-package package-name #:repo 'bioconductor)) ((bioconductor) ;; Retry import from CRAN - (cran->guix-package package-name 'cran)) + (cran->guix-package package-name #:repo 'cran)) (else (values #f '())))))))) (define* (cran-recursive-import package-name #:key (repo 'cran)) @@ -655,7 +655,7 @@ s-expression corresponding to that package, or #f on failure." (input-changes (changed-inputs pkg - (cran->guix-package upstream-name 'bioconductor)))))) + (cran->guix-package upstream-name #:repo 'bioconductor)))))) (define (cran-package? package) "Return true if PACKAGE is an R package from CRAN." -- cgit v1.2.3