diff options
| author | itd <itd@net.in.tum.de> | 2022-09-23 16:11:52 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2022-09-29 22:59:48 +0200 |
| commit | 8b2119a5e4793cad1df1070d488a54ceea420840 (patch) | |
| tree | dc9820c2197c9967ef3ed8c4f1ed299206d682a8 /guix/import | |
| parent | 61bd7bf4690329a10e0a1d3fd1425a73d1823576 (diff) | |
| download | guix-patches-8b2119a5e4793cad1df1070d488a54ceea420840.tar guix-patches-8b2119a5e4793cad1df1070d488a54ceea420840.tar.gz | |
import: print: Quasiquote properties
* guix/import/print.scm (package->code): Quasiquote properties.
* tests/print.scm (pkg-with-properties, pkg-with-properties-source):
New variables.
("package with properties"): New test
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'guix/import')
| -rw-r--r-- | guix/import/print.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/guix/import/print.scm b/guix/import/print.scm index 66016145cb..2f54adbd8c 100644 --- a/guix/import/print.scm +++ b/guix/import/print.scm @@ -200,7 +200,8 @@ when evaluated." (source ,(source->code source version)) ,@(match properties (() '()) - (_ `((properties ,properties)))) + (_ `((properties + ,(list 'quasiquote (object->code properties #t)))))) ,@(if replacement `((replacement ,replacement)) '()) |