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.
This commit is contained in:
parent
58cc369f32
commit
b98293ebed
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue