03/03: gnu: guile-ncurses: Unconditionally return #T from build phases.

[guix-commits]

rekado pushed a commit to branch master
in repository guix.

commit e5855e6f6bcccdeb49c44b10610458a1a72b888d
Author: Ricardo Wurmus <address@hidden>
Date:   Sat Jan 26 22:22:30 2019 +0100

    gnu: guile-ncurses: Unconditionally return #T from build phases.
    
    * gnu/packages/guile.scm (guile-ncurses)[arguments]: Use INVOKE.
---
 gnu/packages/guile.scm | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index 98221a8..b9580b0 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -674,18 +674,18 @@ many readers as needed).")
        (modify-phases %standard-phases
          (add-before 'build 'fix-libguile-ncurses-file-name
            (lambda* (#:key outputs #:allow-other-keys)
-             (and (zero? (system* "make" "install"
-                                  "-C" "src/ncurses"
-                                  "-j" (number->string
-                                        (parallel-job-count))))
-                  (let* ((out   (assoc-ref outputs "out"))
-                         (dir   "src/ncurses")
-                         (files (find-files dir ".scm")))
-                    (substitute* files
-                      (("\"libguile-ncurses\"")
-                       (format #f "\"~a/lib/guile/2.2/libguile-ncurses\""
-                               out)))
-                    #t)))))))
+             (invoke "make" "install"
+                     "-C" "src/ncurses"
+                     "-j" (number->string
+                           (parallel-job-count)))
+             (let* ((out   (assoc-ref outputs "out"))
+                    (dir   "src/ncurses")
+                    (files (find-files dir ".scm")))
+               (substitute* files
+                 (("\"libguile-ncurses\"")
+                  (format #f "\"~a/lib/guile/2.2/libguile-ncurses\""
+                          out)))
+               #t))))))
     (home-page "https://www.gnu.org/software/guile-ncurses/";)
     (synopsis "Guile bindings to ncurses")
     (description