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:
parent
88bfabf111
commit
78c9058dde
|
@ -263,6 +263,9 @@ interface (FFI) of Guile.")
|
||||||
#~(define-module (gcrypt hash)
|
#~(define-module (gcrypt hash)
|
||||||
#:export (sha1 sha256))))
|
#:export (sha1 sha256))))
|
||||||
|
|
||||||
|
(define fake-git
|
||||||
|
(scheme-file "git.scm" #~(define-module (git))))
|
||||||
|
|
||||||
(with-imported-modules `(((guix config)
|
(with-imported-modules `(((guix config)
|
||||||
=> ,(make-config.scm))
|
=> ,(make-config.scm))
|
||||||
|
|
||||||
|
@ -272,6 +275,11 @@ interface (FFI) of Guile.")
|
||||||
;; adjust %LOAD-PATH later on.
|
;; adjust %LOAD-PATH later on.
|
||||||
((gcrypt hash) => ,fake-gcrypt-hash)
|
((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)
|
,@(source-module-closure `((guix store)
|
||||||
(guix self)
|
(guix self)
|
||||||
(guix derivations)
|
(guix derivations)
|
||||||
|
|
Loading…
Reference in New Issue