diff options
| -rw-r--r-- | guix/import/print.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix/import/print.scm b/guix/import/print.scm index 471687c0ff..11cc218285 100644 --- a/guix/import/print.scm +++ b/guix/import/print.scm @@ -79,7 +79,9 @@ when evaluated." (patches (origin-patches source))) `(origin (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 (base32 ,(format #f "~a" (bytevector->nix-base32-string sha256)))) |