diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2018-01-15 15:18:03 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2018-01-15 15:18:03 +0100 |
| commit | 403f2dccfcf992573ceeeae7c76c71b4884d3cd4 (patch) | |
| tree | 23935e99ae7533d158cf83b12013989d66c19501 /build-aux/cuirass/gnu-system.scm | |
| parent | 6d49ca16be22e3fb95823ac1780ad9460a18b180 (diff) | |
| download | guix-403f2dccfcf992573ceeeae7c76c71b4884d3cd4.tar guix-403f2dccfcf992573ceeeae7c76c71b4884d3cd4.tar.gz | |
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.
Diffstat (limited to 'build-aux/cuirass/gnu-system.scm')
| -rw-r--r-- | build-aux/cuirass/gnu-system.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/build-aux/cuirass/gnu-system.scm b/build-aux/cuirass/gnu-system.scm index c88267b9d8..f545ba03bc 100644 --- a/build-aux/cuirass/gnu-system.scm +++ b/build-aux/cuirass/gnu-system.scm @@ -44,4 +44,6 @@ ((? license?) `((name . (license-name o)) (uri . ,(license-uri o)) (comment . ,(license-comment o)))) + ((lst ...) + (map entry->sexp-entry lst)) (_ o))) |