summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--gnu/ci.scm11
1 files changed, 10 insertions, 1 deletions
diff --git a/gnu/ci.scm b/gnu/ci.scm
index 1d16805b4f..bf9952a450 100644
--- a/gnu/ci.scm
+++ b/gnu/ci.scm
@@ -89,7 +89,16 @@
         (system . ,(derivation-system drv))
         (description . ,(package-synopsis package))
         (long-description . ,(package-description package))
-        (license . ,(and=> (package-license package) license-name))
+
+        ;; XXX: Hydra ignores licenses that are not a <license> structure or a
+        ;; list thereof.
+        (license . ,(let loop ((license (package-license package)))
+                      (match license
+                        ((? license?)
+                         (license-name license))
+                        ((lst ...)
+                         (map loop license)))))
+
         (home-page . ,(package-home-page package))
         (maintainers . ("bug-guix@gnu.org"))
         (max-silent-time . ,(or (assoc-ref (package-properties package)