andreas pushed a commit to branch master
in repository guix.

commit 93d4d16375d564733387618e3c2ef620568a0c1e
Author: Nicolas Graves <ngra...@ngraves.fr>
AuthorDate: Tue Feb 18 00:43:55 2025 +0100

    build-system/node: Use test-target argument.
    
    * guix/build/node-build-system.scm (check): Use test-target argument.
    
    Signed-off-by: Jelle Licht <jli...@fsfe.org>
    Change-Id: I5b6b273d7c8ad9f9b4d48a5e50e000adcf504402
---
 guix/build/node-build-system.scm | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/guix/build/node-build-system.scm b/guix/build/node-build-system.scm
index 30b1082056..05940bc997 100644
--- a/guix/build/node-build-system.scm
+++ b/guix/build/node-build-system.scm
@@ -319,13 +319,12 @@ exist."
         (format #t "there is no build script to run~%"))
     #t))
 
-(define* (check #:key tests? inputs #:allow-other-keys)
-  "Run 'npm test' if TESTS?"
+(define* (check #:key tests? inputs test-target #:allow-other-keys)
+  "Run 'npm run TEST-TARGET' if TESTS?"
   (if tests?
       (let ((npm (string-append (assoc-ref inputs "node") "/bin/npm")))
-        (invoke npm "test"))
-      (format #t "test suite not run~%"))
-  #t)
+        (invoke npm "run" test-target))
+      (format #t "test suite not run~%")))
 
 (define* (repack #:key inputs #:allow-other-keys)
   (invoke "tar"

Reply via email to