me
/
guix
Archived
1
0
Fork 0
Code

ci: Restore license handling. 

This is a follow-up of 7c02eb6c and 44daec7f. Restore the initial behaviour.

* gnu/ci.scm (package->alist): Restore license handling.
master
Mathieu Othacehe 2020-11-02 20:58:39 +01:00
parent 1077d54f6e
commit b5f2a035f9
No known key found for this signature in database
GPG Key ID: 8354763531769CA6
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
gnu/ci.scm
View File

@ -89,7 +89,16 @@
(system . ,(derivation-system drv)) (system . ,(derivation-system drv))
(description . ,(package-synopsis package)) (description . ,(package-synopsis package))
(long-description . ,(package-description 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)) (home-page . ,(package-home-page package))
(maintainers . ("bug-guix@gnu.org")) (maintainers . ("bug-guix@gnu.org"))
(max-silent-time . ,(or (assoc-ref (package-properties package) (max-silent-time . ,(or (assoc-ref (package-properties package)