diff options
| author | Nicolas Graves <ngraves@ngraves.fr> | 2025-09-11 16:52:58 +0200 |
|---|---|---|
| committer | Jelle Licht <jlicht@fsfe.org> | 2025-10-13 10:26:51 +0200 |
| commit | 28e4bc50e240cee8d1b1814aa64eb8520fd1ff6a (patch) | |
| tree | e0dadbf887564ba88e1f2b5fa86720b014dd7069 | |
| parent | aa71bbd0b739f170ce24f2fbd15d62871029e34f (diff) | |
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>
| -rw-r--r-- | guix/build-system/node.scm | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/guix/build-system/node.scm b/guix/build-system/node.scm index afc7e0b0cf..abd29b2529 100644 --- a/guix/build-system/node.scm +++ b/guix/build-system/node.scm @@ -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 |