rekado pushed a commit to branch master
in repository guix.
commit 1475d45112243a37ae921df41977c4acf3064a6d
Author: Ricardo Wurmus <[email protected]>
AuthorDate: Tue Apr 14 17:23:33 2020 +0200
import/print: Return license with prefix.
* guix/import/print.scm (license->code): Prepend license: prefix.
---
guix/import/print.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/guix/import/print.scm b/guix/import/print.scm
index 4c2a91f..b819e7c 100644
--- a/guix/import/print.scm
+++ b/guix/import/print.scm
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2017 Ricardo Wurmus <[email protected]>
+;;; Copyright © 2017, 2020 Ricardo Wurmus <[email protected]>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -57,7 +57,7 @@ when evaluated."
;; Print either license variable name or the code for a license object
(define (license->code lic)
(let ((var (variable-name lic '(guix licenses))))
- (or var
+ (or (symbol-append 'license: var)
`(license
(name ,(license-name lic))
(uri ,(license-uri lic))
