summaryrefslogtreecommitdiff
path: root/guix
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-01-05 23:10:04 +0100
committerLudovic Courtès <ludo@gnu.org>2019-01-06 00:22:05 +0100
commitc070d1423fcbdc48e749545ecdf277404ab7d77d (patch)
tree47ea9ae8fb29daa9af9ae75ee2b2015117de7b98 /guix
parent18524466bb25a1926277b1111d15fb378ff7941e (diff)
git-download: Use 'invoke'.
* guix/build/git.scm (git-fetch): Use 'invoke' instead of 'system*' for "git submodule update".
Diffstat (limited to 'guix')
-rw-r--r--guix/build/git.scm4
1 files changed, 1 insertions, 3 deletions
diff --git a/guix/build/git.scm b/guix/build/git.scm
index 5b90033c4d..669e38cd32 100644
--- a/guix/build/git.scm
+++ b/guix/build/git.scm
@@ -63,9 +63,7 @@ recursively. Return #t on success, #f otherwise."
(invoke git-command "checkout" commit)))
(when recursive?
;; Now is the time to fetch sub-modules.
- (unless (zero? (system* git-command "submodule" "update"
- "--init" "--recursive"))
- (error "failed to fetch sub-modules" url))
+ (invoke git-command "submodule" "update" "--init" "--recursive")
;; In sub-modules, '.git' is a flat file, not a directory,
;; so we can use 'find-files' here.