import/print: package->code: Fix license object.

* guix/import/print.scm (package->code)<license->code>: Update generated
licence object to match record constructor.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
itd 2021-07-18 22:01:00 +02:00 committed by Ludovic Courtès
parent 703f932cc9
commit 51157d474f
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -60,9 +60,9 @@ (define (license->code lic)
(if var (if var
(symbol-append 'license: var) (symbol-append 'license: var)
`(license `(license
(name ,(license-name lic)) ,(license-name lic)
(uri ,(license-uri lic)) ,(license-uri lic)
(comment ,(license-comment lic)))))) ,(license-comment lic)))))
(define (search-path-specification->code spec) (define (search-path-specification->code spec)
`(search-path-specification `(search-path-specification