From 6d7328b2f19d2a13d18e34cc875f6c8b5218ac1d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Tue, 30 Sep 2014 10:11:38 +0200
Subject: [PATCH] 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.
---
guix/scripts/pull.scm | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/guix/scripts/pull.scm b/guix/scripts/pull.scm
index c2ea0e3d977..919ef2d4670 100644
--- a/guix/scripts/pull.scm
+++ b/guix/scripts/pull.scm
@@ -47,6 +47,10 @@ (define builder
#~(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
--
GitLab