diff options
| author | Ricardo Wurmus <rekado@elephly.net> | 2020-04-14 17:24:09 +0200 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2020-04-16 23:41:52 +0200 |
| commit | 6269dd567e85c78a87be8d55f7ddc801a0ea870c (patch) | |
| tree | d8d05efdfc976c79e2efa2c8d65702ca0265ad5c | |
| parent | 1475d45112243a37ae921df41977c4acf3064a6d (diff) | |
| download | guix-6269dd567e85c78a87be8d55f7ddc801a0ea870c.tar.gz | |
import/print: package->code: Wrap build system value in module reference.
* guix/import/print.scm (package->code): Return build system value with corresponding module.
| -rw-r--r-- | guix/import/print.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/guix/import/print.scm b/guix/import/print.scm index b819e7cf90..4529a79b23 100644 --- a/guix/import/print.scm +++ b/guix/import/print.scm @@ -131,8 +131,9 @@ when evaluated." ,@(if replacement `((replacement ,replacement)) '()) - (build-system ,(symbol-append (build-system-name build-system) - '-build-system)) + (build-system (@ (guix build-system ,(build-system-name build-system)) + ,(symbol-append (build-system-name build-system) + '-build-system))) ,@(match arguments (() '()) (args `((arguments ,(list 'quasiquote args))))) |