parent
0fc4f69d1e
commit
0736898ccd
|
@ -83,7 +83,7 @@
|
||||||
(for ([submodule (in-list submodules)])
|
(for ([submodule (in-list submodules)])
|
||||||
(define dir (build-path scheme-dir submodule))
|
(define dir (build-path scheme-dir submodule))
|
||||||
(unless (directory-exists? (build-path dir ".git"))
|
(unless (directory-exists? (build-path dir ".git"))
|
||||||
(clone (format "~a~a/.git" submodule extra-repos-base)
|
(clone (format "~a~a/.git" extra-repos-base submodule)
|
||||||
(build-path scheme-dir submodule))))
|
(build-path scheme-dir submodule))))
|
||||||
(when pull?
|
(when pull?
|
||||||
(parameterize ([current-directory scheme-dir])
|
(parameterize ([current-directory scheme-dir])
|
||||||
|
|
Loading…
Reference in New Issue
Block a user