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'.
This commit is contained in:
parent
ff992fcfaf
commit
ab270bf2e9
1 changed files with 2 additions and 5 deletions
|
@ -350,9 +350,7 @@ type '<elpa-package>'."
|
||||||
(elpa-package-inputs pkg))))
|
(elpa-package-inputs pkg))))
|
||||||
|
|
||||||
(define dependencies
|
(define dependencies
|
||||||
(map (lambda (n)
|
(map (compose string->symbol elpa-name->package-name)
|
||||||
(let ((new-n (elpa-name->package-name n)))
|
|
||||||
(list new-n (list 'unquote (string->symbol new-n)))))
|
|
||||||
dependencies-names))
|
dependencies-names))
|
||||||
|
|
||||||
(define (maybe-inputs input-type inputs)
|
(define (maybe-inputs input-type inputs)
|
||||||
|
@ -360,8 +358,7 @@ type '<elpa-package>'."
|
||||||
(()
|
(()
|
||||||
'())
|
'())
|
||||||
((inputs ...)
|
((inputs ...)
|
||||||
(list (list input-type
|
(list (list input-type `(list ,@inputs))))))
|
||||||
(list 'quasiquote inputs))))))
|
|
||||||
|
|
||||||
(define melpa-source
|
(define melpa-source
|
||||||
(melpa-recipe->origin melpa-recipe))
|
(melpa-recipe->origin melpa-recipe))
|
||||||
|
|
Reference in a new issue