summary refs log tree commit diff
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2022-08-12 18:59:11 +0200
committerRicardo Wurmus <rekado@elephly.net>2022-09-20 17:02:33 +0200
commit8c620a60367e26b30dae22988e2ddc972b64234d (patch)
treec90dd37b3c742e4780860f54851b99f1d57854e8
parentf8f3cffedca422bab7c91c4886d4bbb5d92b935d (diff)
downloadguix-8c620a60367e26b30dae22988e2ddc972b64234d.tar.gz
import/cran: download: Accept optional REF argument.
* guix/import/cran.scm (download): Accept REF argument for git downloads.
-rw-r--r--guix/import/cran.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/import/cran.scm b/guix/import/cran.scm
index 4e1ce7c010..69d01b5f7c 100644
--- a/guix/import/cran.scm
+++ b/guix/import/cran.scm
@@ -200,11 +200,11 @@ bioconductor package NAME, or #F if the package is unknown."
 ;; Little helper to download URLs only once.
 (define download
   (memoize
-   (lambda* (url #:key method)
+   (lambda* (url #:key method (ref '()))
      (with-store store
        (cond
         ((eq? method 'git)
-         (latest-repository-commit store url))
+         (latest-repository-commit store url #:ref ref))
         ((eq? method 'hg)
          (call-with-temporary-directory
           (lambda (dir)