packages: Allow use of origins as patches.
* guix/packages.scm (patch-and-repack)[patch-inputs]: Use 'add-to-store' only if the PATCH is a file name, and 'package-source-derivation' if PATCH is an origin.
This commit is contained in:
parent
8689901f95
commit
3f6f7b36d3
|
@ -345,8 +345,12 @@ IMPORTED-MODULES specify modules to use/import for use by SNIPPET."
|
||||||
(define patch-inputs
|
(define patch-inputs
|
||||||
(map (lambda (number patch)
|
(map (lambda (number patch)
|
||||||
(list (string-append "patch" (number->string number))
|
(list (string-append "patch" (number->string number))
|
||||||
|
(match patch
|
||||||
|
((? string?)
|
||||||
(add-to-store store (basename patch) #t
|
(add-to-store store (basename patch) #t
|
||||||
"sha256" patch)))
|
"sha256" patch))
|
||||||
|
((? origin?)
|
||||||
|
(package-source-derivation store patch)))))
|
||||||
(iota (length patches))
|
(iota (length patches))
|
||||||
|
|
||||||
patches))
|
patches))
|
||||||
|
|
Loading…
Reference in New Issue