diff options
author | Ludovic Courtès <ludo@gnu.org> | 2021-04-16 18:00:44 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2021-04-16 23:25:23 +0200 |
commit | 5b35c9adc899749a0bd96a0e6d2c3bbf88e38963 (patch) | |
tree | 2072b5b84cc06e5b6a7e49cd0cdf3aabd4216656 | |
parent | c3926120ba5ea76f531541b7926ccb6739575e0e (diff) |
git-download: Call 'libgit2-init!'.
Fixes <https://bugs.gnu.org/47797>.
Reported by Ingo Ruhnke <grumbel@gmail.com>
and Nicolò Balzarotti <anothersms@gmail.com>.
Regression introduced in c1940fde43c7aca37d67589cc5cb248086d17d56.
* guix/git-download.scm (git-predicate): Add call to 'libgit2-init!'.
-rw-r--r-- | guix/git-download.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/guix/git-download.scm b/guix/git-download.scm index 425184717a..199effece5 100644 --- a/guix/git-download.scm +++ b/guix/git-download.scm @@ -27,6 +27,7 @@ #:use-module (guix packages) #:use-module (guix modules) #:autoload (guix build-system gnu) (standard-packages) + #:autoload (git bindings) (libgit2-init!) #:autoload (git repository) (repository-open repository-close! repository-discover @@ -225,6 +226,7 @@ upon Git errors, return #f instead of a predicate. The returned predicate takes two arguments FILE and STAT where FILE is an absolute file name and STAT is the result of 'lstat'." + (libgit2-init!) (catch 'git-error (lambda () (let* ((files (git-file-list directory)) |