aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2019-01-24 23:08:09 +0100
committerRicardo Wurmus <rekado@elephly.net>2019-01-24 23:08:09 +0100
commite99b47729a7d2a2f2af348e1c760366e86eba179 (patch)
tree3174ed39daded9b13d3a11550ab23c530998b2cf
parentc28bf42f2adce1a37bfbc4e18387910e476c166d (diff)
downloadgnu-guix-e99b47729a7d2a2f2af348e1c760366e86eba179.tar
gnu-guix-e99b47729a7d2a2f2af348e1c760366e86eba179.tar.gz
gnu: sloccount: Use INVOKE.
* gnu/packages/code.scm (sloccount)[arguments]: Use INVOKE and unconditionally return #T from build phases.
-rw-r--r--gnu/packages/code.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/gnu/packages/code.scm b/gnu/packages/code.scm
index 3a575ad380..cfe014e81e 100644
--- a/gnu/packages/code.scm
+++ b/gnu/packages/code.scm
@@ -186,14 +186,15 @@ around in a large, deeply nested project.")
(mkdir-p (string-append out
"/share/man/man1"))
(mkdir-p (string-append out
- "/share/doc")))))
+ "/share/doc"))
+ #t)))
(replace 'check
(lambda _
(setenv "HOME" (getcwd))
(setenv "PATH"
(string-append (getcwd) ":"
(getenv "PATH")))
- (zero? (system* "make" "test")))))
+ (invoke "make" "test"))))
#:make-flags (list (string-append "PREFIX="
(assoc-ref %outputs "out")))))