git-download: Use 'invoke'.

* guix/build/git.scm (git-fetch): Use 'invoke' instead of 'system*' for
"git submodule update".
master
Ludovic Courtès 2019-01-05 23:10:04 +01:00
parent 18524466bb
commit c070d1423f
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 1 additions and 3 deletions

View File

@ -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.