From 7c02eb6c8d7d050ecb8f3082c4a754ad32211403 Mon Sep 17 00:00:00 2001
From: Mathieu Othacehe <othacehe@gnu.org>
Date: Mon, 2 Nov 2020 10:30:31 +0100
Subject: ci: Ignore package license.

Fixes: <https://issues.guix.gnu.org/44370>.

* gnu/ci.scm (package->alist): Ignore package license.
---
 gnu/ci.scm | 11 +----------
 1 file changed, 1 insertion(+), 10 deletions(-)

(limited to 'gnu/ci.scm')

diff --git a/gnu/ci.scm b/gnu/ci.scm
index bf9952a450..adcb04f380 100644
--- a/gnu/ci.scm
+++ b/gnu/ci.scm
@@ -89,16 +89,7 @@
         (system . ,(derivation-system drv))
         (description . ,(package-synopsis package))
         (long-description . ,(package-description package))
-
-        ;; 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)))))
-
+        (license . ,(package-license package))
         (home-page . ,(package-home-page package))
         (maintainers . ("bug-guix@gnu.org"))
         (max-silent-time . ,(or (assoc-ref (package-properties package)
-- 
cgit v1.2.3