import/print: Don't factorize URI if there's no version match.
* guix/import/print.scm (package->code): If FACTORIZE-URI returns just the unmodified string use that as the URI.master
parent
3fd4c4c839
commit
3c0422b9be
|
@ -79,7 +79,9 @@ when evaluated."
|
||||||
(patches (origin-patches source)))
|
(patches (origin-patches source)))
|
||||||
`(origin
|
`(origin
|
||||||
(method ,(procedure-name method))
|
(method ,(procedure-name method))
|
||||||
(uri (string-append ,@(factorize-uri uri version)))
|
(uri (string-append ,@(match (factorize-uri uri version)
|
||||||
|
((? string? uri) (list uri))
|
||||||
|
(factorized factorized))))
|
||||||
(sha256
|
(sha256
|
||||||
(base32
|
(base32
|
||||||
,(format #f "~a" (bytevector->nix-base32-string sha256))))
|
,(format #f "~a" (bytevector->nix-base32-string sha256))))
|
||||||
|
|
Reference in New Issue