[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: git: Check whether 'clone-init-options' is defined.
|
From: |
Ludovic Courtès |
|
Subject: |
01/01: git: Check whether 'clone-init-options' is defined. |
|
Date: |
Sat, 11 Nov 2017 14:09:32 -0500 (EST) |
civodul pushed a commit to branch master
in repository guix.
commit b1488c76536c991c363aff7fd08dc6a49b8fbb30
Author: Ludovic Courtès <address@hidden>
Date: Sat Nov 11 18:38:27 2017 +0100
git: Check whether 'clone-init-options' is defined.
This is a followup to 195f0d05c3f64e17e84b2683a7045a14ec578d61.
* guix/git.scm (clone*): Check whether 'clone-init-options' is defined
before using it.
---
guix/git.scm | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/guix/git.scm b/guix/git.scm
index ad4fc30..7a83b56 100644
--- a/guix/git.scm
+++ b/guix/git.scm
@@ -58,7 +58,10 @@ make sure no empty directory is left behind."
;; Note: Explicitly pass options to work around the invalid default
;; value in Guile-Git: <https://bugs.gnu.org/29238>.
- (clone url directory (clone-init-options)))
+ (if (module-defined? (resolve-interface '(git))
+ 'clone-init-options)
+ (clone url directory (clone-init-options))
+ (clone url directory)))
(lambda _
(false-if-exception (rmdir directory)))))