summary refs log tree commit diff
diff options
context:
space:
mode:
authorMark H Weaver <mhw@netris.org>2018-03-16 06:36:21 -0400
committerMark H Weaver <mhw@netris.org>2018-03-16 06:44:26 -0400
commitd1c86620f3a73a29615fcd7a7fe80918dc3cad8e (patch)
tree6fd37bfcef2680a072d74533679531b7a99c95b8
parent1a83e2a286f258de8d887c28130b7baf038fd3e5 (diff)
downloadguix-d1c86620f3a73a29615fcd7a7fe80918dc3cad8e.tar.gz
gnu: make-bootstrap: tarball-package: Use invoke instead of system*.
* gnu/packages/make-bootstrap.scm (tarball-package)[arguments]: Use invoke.
The builder always returns #t.
-rw-r--r--gnu/packages/make-bootstrap.scm22
1 files changed, 11 insertions, 11 deletions
diff --git a/gnu/packages/make-bootstrap.scm b/gnu/packages/make-bootstrap.scm
index 0b41d2cbc7..543aa919c3 100644
--- a/gnu/packages/make-bootstrap.scm
+++ b/gnu/packages/make-bootstrap.scm
@@ -632,17 +632,17 @@ for `sh' in $PATH, and without nscd, and with static NSS modules."
              (mkdir out)
              (set-path-environment-variable "PATH" '("bin") (list tar xz))
              (with-directory-excursion input
-               (zero? (system* "tar" "cJvf"
-                               (string-append out "/"
-                                              ,name "-" ,version
-                                              "-"
-                                              ,(or (%current-target-system)
-                                                   (%current-system))
-                                              ".tar.xz")
-                               "."
-                               ;; avoid non-determinism in the archive
-                               "--sort=name" "--mtime=@0"
-                               "--owner=root:0" "--group=root:0"))))))))))
+               (invoke "tar" "cJvf"
+                       (string-append out "/"
+                                      ,name "-" ,version
+                                      "-"
+                                      ,(or (%current-target-system)
+                                           (%current-system))
+                                      ".tar.xz")
+                       "."
+                       ;; avoid non-determinism in the archive
+                       "--sort=name" "--mtime=@0"
+                       "--owner=root:0" "--group=root:0")))))))))
 
 (define %bootstrap-binaries-tarball
   ;; A tarball with the statically-linked bootstrap binaries.