summary refs log tree commit diff
path: root/guix/import/gem.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix/import/gem.scm')
-rw-r--r--guix/import/gem.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/guix/import/gem.scm b/guix/import/gem.scm
index f4589b98b3..bd5d5b3569 100644
--- a/guix/import/gem.scm
+++ b/guix/import/gem.scm
@@ -44,7 +44,12 @@
   (version       gem-version)                     ;string
   (authors       gem-authors)                     ;string
   (licenses      gem-licenses "licenses"          ;list of strings
-                 vector->list)
+                 (lambda (licenses)
+                   ;; This is sometimes #nil (the JSON 'null' value).  Arrange
+                   ;; to always return a list.
+                   (cond ((not licenses) '())
+                         ((vector? licenses) (vector->list licenses))
+                         (else '()))))
   (info          gem-info)
   (sha256        gem-sha256 "sha"                 ;bytevector
                  base16-string->bytevector)