diff options
| author | Nicolas Graves <ngraves@ngraves.fr> | 2025-09-11 23:09:24 +0200 |
|---|---|---|
| committer | Jelle Licht <jlicht@fsfe.org> | 2025-10-13 10:27:02 +0200 |
| commit | c4979574619a744fc7a7959e51719c50e956d694 (patch) | |
| tree | 1ac2c4fd2003e6388eb6853da05a72a33a725177 | |
| parent | c34b0a4b44da00db710cf4bf2220e94d528cd475 (diff) | |
build-system: node: Remove trailing #t.
* guix/build/node-build-system.scm (set-home, delete-lockfiles, build,
repack, install): Remove trailing #t.
Change-Id: Idf5ba50242a7b9fb5d30c8fca6e6662471cf87e4
Signed-off-by: Jelle Licht <jlicht@fsfe.org>
| -rw-r--r-- | guix/build/node-build-system.scm | 15 |
1 files changed, 5 insertions, 10 deletions
diff --git a/guix/build/node-build-system.scm b/guix/build/node-build-system.scm index 53bffb3de0..125c1f9b29 100644 --- a/guix/build/node-build-system.scm +++ b/guix/build/node-build-system.scm @@ -193,8 +193,7 @@ only after the 'patch-dependencies' phase." (begin (mkdir dir) (setenv "HOME" (string-append (getcwd) "/" dir)) - (format #t "set HOME to ~s~%" (getenv "HOME"))))))) - #t) + (format #t "set HOME to ~s~%" (getenv "HOME")))))))) (define (module-name module) (let* ((package.json (string-append module "/package.json")) @@ -259,8 +258,7 @@ only after the 'patch-dependencies' phase." (define* (configure #:key outputs inputs #:allow-other-keys) (let ((npm (string-append (assoc-ref inputs "node") "/bin/npm"))) - (invoke npm "--offline" "--ignore-scripts" "--install-links" "install") - #t)) + (invoke npm "--offline" "--ignore-scripts" "--install-links" "install"))) (define* (build #:key inputs #:allow-other-keys) (let* ((package-meta (call-with-input-file "package.json" json->scm)) @@ -268,8 +266,7 @@ only after the 'patch-dependencies' phase." (if (and scripts (assoc-ref scripts "build")) (let ((npm (string-append (assoc-ref inputs "node") "/bin/npm"))) (invoke npm "run" "build")) - (format #t "there is no build script to run~%")) - #t)) + (format #t "there is no build script to run~%")))) (define* (check #:key tests? inputs test-target #:allow-other-keys) "Run 'npm run TEST-TARGET' if TESTS?" @@ -286,8 +283,7 @@ only after the 'patch-dependencies' phase." "--owner=0" "--group=0" "--numeric-owner" - "-czf" "../package.tgz" ".") - #t) + "-czf" "../package.tgz" ".")) (define* (install #:key outputs inputs #:allow-other-keys) "Install the node module to the output store item." @@ -299,8 +295,7 @@ only after the 'patch-dependencies' phase." "--loglevel" "info" "--production" "--install-links" - "install" "../package.tgz") - #t)) + "install" "../package.tgz"))) (define* (avoid-node-gyp-rebuild #:key outputs #:allow-other-keys) "Adjust the installed 'package.json' to remove an 'install' script that |