pull: Add guile-ssh to the dependencies.
Fix regression introduced in 9e76eed
.
* build-aux/build-self.scm (guile-ssh): New variable.
(build)[builder]: Add 'guile-ssh' to %load-path and %load-compiled-path.
master
parent
faa29e4bdb
commit
5aed7f10f3
|
@ -61,6 +61,8 @@
|
||||||
(define guile-json
|
(define guile-json
|
||||||
(first (find-best-packages-by-name "guile-json" #f)))
|
(first (find-best-packages-by-name "guile-json" #f)))
|
||||||
|
|
||||||
|
(define guile-ssh
|
||||||
|
(first (find-best-packages-by-name "guile-ssh" #f)))
|
||||||
|
|
||||||
|
|
||||||
;; The actual build procedure.
|
;; The actual build procedure.
|
||||||
|
@ -103,8 +105,14 @@ files."
|
||||||
(use-modules (guix build pull))
|
(use-modules (guix build pull))
|
||||||
|
|
||||||
(let ((json (string-append #$guile-json "/share/guile/site/2.0")))
|
(let ((json (string-append #$guile-json "/share/guile/site/2.0")))
|
||||||
(set! %load-path (cons json %load-path))
|
(set! %load-path
|
||||||
(set! %load-compiled-path (cons json %load-compiled-path)))
|
(cons* json
|
||||||
|
(string-append #$guile-ssh "/share/guile/site/2.0")
|
||||||
|
%load-path))
|
||||||
|
(set! %load-compiled-path
|
||||||
|
(cons* json
|
||||||
|
(string-append #$guile-ssh "/lib/guile/2.0/site-ccache")
|
||||||
|
%load-compiled-path)))
|
||||||
|
|
||||||
(build-guix #$output #$source
|
(build-guix #$output #$source
|
||||||
|
|
||||||
|
|
Reference in New Issue