~ruther/guix-local: cuirass: Properly convert list of <license> objects.

~ruther/guix-local

403f2dccfcf992573ceeeae7c76c71b4884d3cd4 — Ludovic Courtès 8 years ago 6d49ca1

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.

patch browse .tar.gz

1 files changed, 2 insertions(+), 0 deletions(-)

M build-aux/cuirass/gnu-system.scm

M build-aux/cuirass/gnu-system.scm => build-aux/cuirass/gnu-system.scm +2 -0

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