aboutsummaryrefslogtreecommitdiff
path: root/guix/import/elpa.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2021-06-30 16:09:00 +0200
committerLudovic Courtès <ludo@gnu.org>2021-07-11 00:49:16 +0200
commitab270bf2e9e301b14fe90c36976835331d67acf5 (patch)
tree903263c70fa8e2f2408042601bba157b9c141134 /guix/import/elpa.scm
parentff992fcfaf8455910b4bb5e02861fe9ae3dfd974 (diff)
downloadguix-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'.
Diffstat (limited to 'guix/import/elpa.scm')
-rw-r--r--guix/import/elpa.scm7
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))