From 03178aec1dc63c630374b1aed2178140c185b9f5 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Thu, 8 May 2014 19:44:44 +0200
Subject: [PATCH] git-download: Disable TLS certificate verification.

* guix/build/git.scm (git-fetch): Add 'setenv' call.
---
 guix/build/git.scm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/guix/build/git.scm b/guix/build/git.scm
index 4245594c38..68b132265b 100644
--- a/guix/build/git.scm
+++ b/guix/build/git.scm
@@ -31,6 +31,11 @@
                     #:key (git-command "git"))
   "Fetch COMMIT from URL into DIRECTORY.  COMMIT must be a valid Git commit
 identifier.  Return #t on success, #f otherwise."
+
+  ;; Disable TLS certificate verification.  The hash of the checkout is known
+  ;; in advance anyway.
+  (setenv "GIT_SSL_NO_VERIFY" "true")
+
   (and (zero? (system* git-command "clone" url directory))
        (with-directory-excursion directory
          (system* git-command "tag" "-l")