04/10: gnu: fbcat, slepc: Use INVOKE.

[Tobias Geerinckx-Rice]

nckx pushed a commit to branch master
in repository guix.

commit 94a1eb96d32fcce97ee5d9440ecffe22f7555cd5
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Fri Jan 26 22:59:40 2018 +0100

    gnu: fbcat, slepc: Use INVOKE.
    
    * gnu/packages/linux.scm (fbcat)[arguments]: Substitute INVOKE for
    SYSTEM*.
    * gnu/packages/maths.scm (slepc)[arguments]: Likewise.
---
 gnu/packages/linux.scm | 5 +++--
 gnu/packages/maths.scm | 2 +-
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index 869b4f7..9a410b0 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -4587,8 +4587,9 @@ relevant @file{/dev/vcs*} file(s).")
          (delete 'configure)            ; no configure script
          (add-after 'build 'build-documentation
            (lambda* (#:key make-flags #:allow-other-keys)
-             (zero? (apply system* "make" "-C" "doc"
-                           make-flags))))
+             (apply invoke "make" "-C" "doc"
+                    make-flags)
+             #t))
          (add-after 'build 'qualify-references
            (lambda* (#:key inputs outputs #:allow-other-keys)
              (let* ((pnmtopng (assoc-ref inputs "pnmtopng"))
diff --git a/gnu/packages/maths.scm b/gnu/packages/maths.scm
index d4e9914..90beb6c 100644
--- a/gnu/packages/maths.scm
+++ b/gnu/packages/maths.scm
@@ -1647,7 +1647,7 @@ scientific applications modeled by partial differential 
equations.")
               (format #t "configure flags: ~s~%" flags)
               (setenv "SLEPC_DIR" (getcwd))
               (setenv "PETSC_DIR" (assoc-ref inputs "petsc"))
-              (zero? (apply system* "./configure" flags)))))
+              (invoke "./configure" flags))))
          (add-after 'install 'delete-doc
           ;; TODO: SLEPc installs HTML documentation alongside headers in
           ;; $out/include.  We'd like to move them to share/doc, but delete