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
1 changed files with 2 additions and 0 deletions

View File

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