TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

import/print: package->code: Wrap S-expression in definition.

Browse source 
* guix/import/print.scm (package->code): Return a definition, not just a
package expression.
This commit is contained in:
Ricardo Wurmus 2020-04-15 00:39:45 +02:00
parent c893432320
commit 86a3b540d0
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 44 additions and 43 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
guix/import/print.scm
View file

@ -121,7 +121,8 @@ (define (package-lists->code lsts)
(home-page (package-home-page package))
(supported-systems (package-supported-systems package))
(properties (package-properties package)))
`(package
`(define-public ,(string->symbol name)
(package
(name ,name)
(version ,version)
(source ,(source->code source version))
@ -163,4 +164,4 @@ (define (package-lists->code lsts)
(description ,description)
(license ,(if (list? license)
`(list ,@(map license->code license))
(license->code license))))))
(license->code license)))))))