~ruther/guix-local: pull: Add dependency on Guile-JSON.

6d7328b2f19d2a13d18e34cc875f6c8b5218ac1d — Ludovic Courtès 11 years ago 8505493

pull: Add dependency on Guile-JSON.

Reported by Alex Sassmannshausen <alex.sassmannshausen@gmail.com>.

* guix/scripts/pull.scm (unpack): Add Guile-JSON to %load-path and
  %load-compiled-path.

patch browse .tar.gz

1 files changed, 4 insertions(+), 0 deletions(-)

M guix/scripts/pull.scm

M guix/scripts/pull.scm => guix/scripts/pull.scm +4 -0

@@ 47,6 47,10 @@ files."
     #~(begin
         (use-modules (guix build pull))
 
+        (let ((json (string-append #$guile-json "/share/guile/site/2.0")))
+          (set! %load-path (cons json %load-path))
+          (set! %load-compiled-path (cons json %load-compiled-path)))
+
         (build-guix #$output #$tarball
 
                     ;; XXX: This is not perfect, enabling VERBOSE? means