aboutsummaryrefslogtreecommitdiff
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)
downloadgnu-guix-d1c86620f3a73a29615fcd7a7fe80918dc3cad8e.tar
gnu-guix-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.