cuirass: Properly convert list of <license> objects.

Fixes a bug whereby we would 'write' raw <license> objects when they
were in a list.

* build-aux/cuirass/gnu-system.scm (entry->sexp-entry): Add recursive
case when O is a list.
This commit is contained in:
Ludovic Courtès 2018-01-15 15:18:03 +01:00
parent 6d49ca16be
commit 403f2dccfc
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -44,4 +44,6 @@ (define (entry->sexp-entry o)
((? license?) `((name . (license-name o))
(uri . ,(license-uri o))
(comment . ,(license-comment o))))
((lst ...)
(map entry->sexp-entry lst))
(_ o)))