diff options
author | Ricardo Wurmus <rekado@elephly.net> | 2020-04-15 00:41:03 +0200 |
---|---|---|
committer | Ricardo Wurmus <rekado@elephly.net> | 2020-04-16 23:41:52 +0200 |
commit | 3532fc39fff41eabd061370ee36a1d42b9fac0e6 (patch) | |
tree | dd562f1a830a8eb67ad3f9c386b6d586614569a1 /guix/import/print.scm | |
parent | 86a3b540d08e0ece2a697f7caa6342a55394a6b3 (diff) |
import/utils: alist->package: Ignore known inputs.
* guix/import/utils.scm (alist->package): Accept optional list of known
inputs, which are excluded from the specification lookup.
* guix/import/print.scm (package->code)[package-lists->code]: Handle inputs
which are just symbols.
Diffstat (limited to 'guix/import/print.scm')
-rw-r--r-- | guix/import/print.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/guix/import/print.scm b/guix/import/print.scm index 08f3ec9c34..471687c0ff 100644 --- a/guix/import/print.scm +++ b/guix/import/print.scm @@ -92,6 +92,8 @@ when evaluated." (define (package-lists->code lsts) (list 'quasiquote (map (match-lambda + ((? symbol? s) + (list (symbol->string s) (list 'unquote s))) ((label pkg . out) (let ((mod (package-module-name pkg))) (cons* label |