08/30: build-system/texlive: Use invoke instead of system*.

[Mark H. Weaver]

mhw pushed a commit to branch core-updates
in repository guix.

commit 68ca0efa9aece04fab4cd631accd74f652fd1373
Author: Mark H Weaver <m...@netris.org>
Date:   Fri Mar 16 03:25:23 2018 -0400

    build-system/texlive: Use invoke instead of system*.
    
    * guix/build/texlive-build-system.scm (compile-with-latex): Use invoke.
---
 guix/build/texlive-build-system.scm | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/guix/build/texlive-build-system.scm 
b/guix/build/texlive-build-system.scm
index 78141b4..1c393ec 100644
--- a/guix/build/texlive-build-system.scm
+++ b/guix/build/texlive-build-system.scm
@@ -34,11 +34,11 @@
 ;; Code:
 
 (define (compile-with-latex format file)
-  (zero? (system* format
-                  "-interaction=batchmode"
-                  "-output-directory=build"
-                  (string-append "&" format)
-                  file)))
+  (invoke format
+          "-interaction=batchmode"
+          "-output-directory=build"
+          (string-append "&" format)
+          file))
 
 (define* (configure #:key inputs #:allow-other-keys)
   (let* ((out       (string-append (getcwd) "/.texlive-union"))