summary refs log tree commit diff
diff options
context:
space:
mode:
authorRicardo Wurmus <ricardo.wurmus@mdc-berlin.de>2016-03-22 15:12:30 +0100
committerRicardo Wurmus <ricardo.wurmus@mdc-berlin.de>2016-03-22 17:57:40 +0100
commitb98293ebed46086c21cdd975c4a8c6139b2edcd0 (patch)
tree3229b08e0f7a1cce9ad657e201b2ddb0e1553494
parent58cc369f32d0b83d845fcf3cb2bdb5a8abdd2bb3 (diff)
downloadguix-b98293ebed46086c21cdd975c4a8c6139b2edcd0.tar.gz
import: cran: Accept single URL in addition to single URL.
* guix/import/cran.scm (package->upstream-name): Match single URL in
  addition to list of URLs.
-rw-r--r--guix/import/cran.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/import/cran.scm b/guix/import/cran.scm
index f36e9482cf..562917c0a0 100644
--- a/guix/import/cran.scm
+++ b/guix/import/cran.scm
@@ -227,7 +227,7 @@ s-expression corresponding to that package, or #f on failure."
         (match (package-source package)
           ((? origin? origin)
            (match (origin-uri origin)
-             ((url rest ...)
+             ((or (? string? url) (url _ ...))
               (let ((end   (string-rindex url #\_))
                     (start (string-rindex url #\/)))
                 ;; The URL ends on