diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2021-06-30 16:09:00 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2021-07-11 00:49:16 +0200 |
| commit | ab270bf2e9e301b14fe90c36976835331d67acf5 (patch) | |
| tree | 903263c70fa8e2f2408042601bba157b9c141134 | |
| parent | ff992fcfaf8455910b4bb5e02861fe9ae3dfd974 (diff) | |
| download | guix-ab270bf2e9e301b14fe90c36976835331d67acf5.tar guix-ab270bf2e9e301b14fe90c36976835331d67acf5.tar.gz | |
import: elpa: Emit new-style package inputs.
* guix/import/elpa.scm (elpa-package->sexp)[dependencies]: Turn into a
list of symbols.
[maybe-inputs]: Wrap in 'list' instead of 'quasiquote'.
| -rw-r--r-- | guix/import/elpa.scm | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/guix/import/elpa.scm b/guix/import/elpa.scm index c0dc5acf51..0a1c414c25 100644 --- a/guix/import/elpa.scm +++ b/guix/import/elpa.scm @@ -350,9 +350,7 @@ type '<elpa-package>'." (elpa-package-inputs pkg)))) (define dependencies - (map (lambda (n) - (let ((new-n (elpa-name->package-name n))) - (list new-n (list 'unquote (string->symbol new-n))))) + (map (compose string->symbol elpa-name->package-name) dependencies-names)) (define (maybe-inputs input-type inputs) @@ -360,8 +358,7 @@ type '<elpa-package>'." (() '()) ((inputs ...) - (list (list input-type - (list 'quasiquote inputs)))))) + (list (list input-type `(list ,@inputs)))))) (define melpa-source (melpa-recipe->origin melpa-recipe)) |