01/36: gnu: guile-irregex: Use invoke.

[Mark H. Weaver]

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

commit 67eb6f508edd26e0acc475eb25d6ae1eb164880a
Author: Mark H Weaver <address@hidden>
Date:   Fri Mar 16 01:38:38 2018 -0400

    gnu: guile-irregex: Use invoke.
    
    * gnu/packages/guile.scm (guile-irregex)[arguments]: Use invoke.
---
 gnu/packages/guile.scm | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index f90f6ae..40db937 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -1064,12 +1064,10 @@ understand, extend, and port to host languages other 
than Scheme.")
                                 (copy-file src-file
                                            dest-file)
                                 ;; Install compiled module.
-                                (unless (zero? (system* guild "compile"
-                                                        "-L" (getcwd)
-                                                        "-o" go-file
-                                                        src-file))
-                                  (error (format #f "Failed to compile ~s to 
~s!"
-                                                 src-file dest-file)))))))
+                                (invoke guild "compile"
+                                        "-L" (getcwd)
+                                        "-o" go-file
+                                        src-file)))))
                          '(("irregex-guile.scm" "/rx/irregex")
                            ("irregex.scm" "/rx/source/irregex")
                            ;; Not really reachable via guile's packaging 
system,