03/12: gnu: cloc: Update phase style.

[Tobias Geerinckx-Rice]

nckx pushed a commit to branch master
in repository guix.

commit 53244d1ffa544305d4b6c19907dfcaf2bff2fd21
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Sun Mar 4 01:11:47 2018 +0100

    gnu: cloc: Update phase style.
    
    * gnu/packages/code.scm (cloc)[arguments]: Substitute INVOKE for SYSTEM*
    and end phases with #t.
---
 gnu/packages/code.scm | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/gnu/packages/code.scm b/gnu/packages/code.scm
index 4a63cba..8d9c661 100644
--- a/gnu/packages/code.scm
+++ b/gnu/packages/code.scm
@@ -229,13 +229,13 @@ COCOMO model or user-provided parameters.")
                   (replace 'install
                     (lambda* (#:key inputs outputs #:allow-other-keys)
                       (let* ((out (assoc-ref outputs "out")))
-                        (zero?
-                         (system* "make" "-C" "Unix"
-                                  (string-append "prefix=" out)
-                                  (string-append "INSTALL="
-                                                 (assoc-ref inputs "coreutils")
-                                                 "/bin/install")
-                                  "install")))))
+                        (invoke "make" "-C" "Unix"
+                                (string-append "prefix=" out)
+                                (string-append "INSTALL="
+                                               (assoc-ref inputs "coreutils")
+                                               "/bin/install")
+                                "install")
+                        #t)))
                   (add-after 'install 'wrap-program
                     (lambda* (#:key inputs outputs #:allow-other-keys)
                       (let ((out (assoc-ref outputs "out")))