07/08: import/texlive: Process license field only when it exists.

[guix-commits]

rekado pushed a commit to branch master
in repository guix.

commit b849a47bdbd84d68c7f608c26770dc93fbc52e0c
Author: Ricardo Wurmus <rekado@elephly.net>
AuthorDate: Wed Mar 29 21:05:26 2023 +0200

    import/texlive: Process license field only when it exists.
    
    * guix/import/texlive.scm (tlpdb->package): Check "catalogue-license" field
    before using string->license.
---
 guix/import/texlive.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/guix/import/texlive.scm b/guix/import/texlive.scm
index f1557fcd0f..17c17f690c 100644
--- a/guix/import/texlive.scm
+++ b/guix/import/texlive.scm
@@ -298,9 +298,9 @@ of those files are returned that are unexpectedly 
installed."
                        `((home-page ,(string-append "https://ctan.org"; url)))))
               '((home-page "https://www.tug.org/texlive/";)))
         (synopsis ,(assoc-ref data 'shortdesc))
-        (license ,(string->license
-                   (assoc-ref data 'catalogue-license))))
         (description ,(and=> (assoc-ref data 'longdesc) beautify-description))
+        (license ,(and=> (assoc-ref data 'catalogue-license)
+                         string->license)))
      filtered-depends)))
 
 (define texlive->guix-package