diff options
author | Ricardo Wurmus <rekado@elephly.net> | 2024-11-01 13:40:17 +0100 |
---|---|---|
committer | Ricardo Wurmus <rekado@elephly.net> | 2024-11-04 10:26:23 +0100 |
commit | 69ac9b72ce3914c2d1c07f80a2e1db85c9035e5d (patch) | |
tree | 2d16d1f7324f04fe4229628cdbb4c064f7fd070d | |
parent | 8f49545fed3d359dc29688b182bf663030464c24 (diff) | |
download | guix-69ac9b72ce3914c2d1c07f80a2e1db85c9035e5d.tar.gz guix-69ac9b72ce3914c2d1c07f80a2e1db85c9035e5d.zip |
import/cran: Do not crash when license field is missing.
* guix/import/cran.scm (description->package): Do not process license as
string when it's missing.
Change-Id: I415fa6be17631f83c2aa7a213683fdf90a868e96
-rw-r--r-- | guix/import/cran.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/guix/import/cran.scm b/guix/import/cran.scm index 6ae00cae96..2a631c6b1c 100644 --- a/guix/import/cran.scm +++ b/guix/import/cran.scm @@ -737,7 +737,8 @@ from the alist META, which was derived from the R package's DESCRIPTION file." (name (assoc-ref meta "Package")) (synopsis (assoc-ref meta "Title")) (version (assoc-ref meta "Version")) - (license (string->licenses (assoc-ref meta "License") license-prefix)) + (license (and=> (assoc-ref meta "License") + (cut string->licenses <> license-prefix))) ;; Some packages have multiple home pages. Some have none. (home-page (case repository ((git) (assoc-ref meta 'git)) |