mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-04-06 13:10:33 +02:00
build-system: node: Improve (default-guile-json) import style.
Also place it just after (default-node). * guix/build-system/node.scm (default-guile-json): Place it after (default-node) and use helper macro @*. Change-Id: Idc21c9627f414a011915033da0cab845529ddbff Signed-off-by: Jelle Licht <jlicht@fsfe.org>
This commit is contained in:
committed by
Jelle Licht
parent
2487ff1879
commit
ce843095f4
@@ -47,6 +47,10 @@
|
||||
"Return the default Node package, resolved lazily."
|
||||
(@* (gnu packages node) node-lts))
|
||||
|
||||
(define (default-guile-json)
|
||||
"Return the default guile-json package, resolved lazily."
|
||||
(@* (gnu packages guile) guile-json-4))
|
||||
|
||||
(define* (lower name
|
||||
#:key source inputs native-inputs outputs system target
|
||||
(node (default-node))
|
||||
@@ -78,12 +82,6 @@
|
||||
(build node-build)
|
||||
(arguments (strip-keyword-arguments private-keywords arguments)))))
|
||||
|
||||
(define (default-guile-json)
|
||||
"Return the default guile-json package."
|
||||
;; Lazily resolve the binding to avoid a circular dependency.
|
||||
(let ((mod (resolve-interface '(gnu packages guile))))
|
||||
(module-ref mod 'guile-json-4)))
|
||||
|
||||
(define* (node-build name inputs
|
||||
#:key
|
||||
source
|
||||
|
||||
Reference in New Issue
Block a user