build-self: Add a dummy (git) module to 'compute-guix-derivation'.

Fixes a regression introduced in
aed0a59405.

* build-aux/build-self.scm (build-program)[fake-git]: New variable.
Use it as an imported module.
This commit is contained in:
Ludovic Courtès 2018-09-13 10:10:49 +02:00
parent 88bfabf111
commit 78c9058dde
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -263,6 +263,9 @@ (define fake-gcrypt-hash
#~(define-module (gcrypt hash)
#:export (sha1 sha256))))
(define fake-git
(scheme-file "git.scm" #~(define-module (git))))
(with-imported-modules `(((guix config)
=> ,(make-config.scm))
@ -272,6 +275,11 @@ (define fake-gcrypt-hash
;; adjust %LOAD-PATH later on.
((gcrypt hash) => ,fake-gcrypt-hash)
;; (guix git-download) depends on (git) but only
;; for peripheral functionality. Provide a dummy
;; (git) to placate it.
((git) => ,fake-git)
,@(source-module-closure `((guix store)
(guix self)
(guix derivations)