mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2025-01-31 06:46:50 +01:00
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
1 changed files with 1 additions and 1 deletions
|
@ -227,7 +227,7 @@ (define (package->upstream-name package)
|
|||
(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 a new issue