me
/
guix
Archived
1
0
Fork 0
Code

packages: Patches can be any lowerable object. 

* guix/packages.scm (patch-and-repack)[instantiate-patch]: Replace
'origin?' with 'struct?'.
master
Ludovic Courtès 2017-06-15 18:07:10 +02:00 committed by Ludovic Courtès
parent 0208476260
commit 7ebc6cf869
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
guix/packages.scm
View File

@ -477,10 +477,10 @@ specifies modules in scope when evaluating SNIPPET."
(define instantiate-patch
(match-lambda
((? string? patch)
((? string? patch) ;deprecated
(interned-file patch #:recursive? #t))
((? origin? patch)
(origin->derivation patch system))))
((? struct? patch) ;origin, local-file, etc.
(lower-object patch system))))
(mlet %store-monad ((tar -> (lookup-input "tar"))
(xz -> (lookup-input "xz"))