mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-12 06:06:53 -05:00
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 c1940fde43
.
* guix/git-download.scm (git-predicate): Add call to 'libgit2-init!'.
This commit is contained in:
parent
c3926120ba
commit
5b35c9adc8
1 changed files with 2 additions and 0 deletions
|
@ -27,6 +27,7 @@ (define-module (guix git-download)
|
|||
#: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 @@ (define (git-predicate directory)
|
|||
|
||||
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))
|
||||
|
|
Loading…
Reference in a new issue