20/36: gnu: emacs-xelb: Return #t from phases.

[Tobias Geerinckx-Rice]

nckx pushed a commit to branch master
in repository guix.

commit bca4b2e7cce1fbb9ec7f9c093a3697c8ddb4cffd
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Wed Jun 20 03:32:02 2018 +0200

    gnu: emacs-xelb: Return #t from phases.
    
    * gnu/packages/emacs.scm (emacs-xelb)[arguments]: Substitute INVOKE for
    SYSTEM*.
---
 gnu/packages/emacs.scm | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/gnu/packages/emacs.scm b/gnu/packages/emacs.scm
index ae22a2f..87159a9 100644
--- a/gnu/packages/emacs.scm
+++ b/gnu/packages/emacs.scm
@@ -6148,13 +6148,13 @@ which code derived from Kelvin H's org-page.")
        (modify-phases %standard-phases
          (add-after 'unpack 'regenerate-el-files
            (lambda* (#:key inputs #:allow-other-keys)
-             (zero? (system* "make"
-                             (string-append "PROTO_PATH="
-                                            (assoc-ref inputs "xcb-proto")
-                                            "/share/xcb")
-                             (string-append "EMACS_BIN="
-                                            (assoc-ref inputs "emacs")
-                                            "/bin/emacs -Q"))))))))
+             (invoke "make"
+                     (string-append "PROTO_PATH="
+                                    (assoc-ref inputs "xcb-proto")
+                                    "/share/xcb")
+                     (string-append "EMACS_BIN="
+                                    (assoc-ref inputs "emacs")
+                                    "/bin/emacs -Q")))))))
     (native-inputs `(("xcb-proto" ,xcb-proto)))
     (home-page "https://github.com/ch11ng/xelb";)
     (synopsis "X protocol Emacs Lisp binding")