summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2017-11-28 13:29:47 +0100
committerLudovic Courtès <ludo@gnu.org>2017-11-28 13:29:47 +0100
commitdd1640eed606e21c09c4028dfa8aaeb1a071c6cf (patch)
tree560763ee9b9e094754bf3faa8b48494f01fa6a2b
parent91c619ebdfd065f0becbbcc742dc412dc41e77a1 (diff)
downloadguix-dd1640eed606e21c09c4028dfa8aaeb1a071c6cf.tar.gz
gnu: guix: Add guile-bytestructures to the search path.
* gnu/packages/package-management.scm (guix)[arguments]: In
'wrap-program' phase, add guile-bytestructures to the path.
-rw-r--r--gnu/packages/package-management.scm8
1 files changed, 5 insertions, 3 deletions
diff --git a/gnu/packages/package-management.scm b/gnu/packages/package-management.scm
index 6d18fa0782..307e17d15e 100644
--- a/gnu/packages/package-management.scm
+++ b/gnu/packages/package-management.scm
@@ -196,15 +196,17 @@
                         #t))
                     (add-after 'install 'wrap-program
                       (lambda* (#:key inputs outputs #:allow-other-keys)
-                        ;; Make sure the 'guix' command finds GnuTLS and
-                        ;; Guile-JSON automatically.
+                        ;; Make sure the 'guix' command finds GnuTLS,
+                        ;; Guile-JSON, and Guile-Git automatically.
                         (let* ((out    (assoc-ref outputs "out"))
                                (guile  (assoc-ref inputs "guile"))
                                (json   (assoc-ref inputs "guile-json"))
                                (git    (assoc-ref inputs "guile-git"))
+                               (bs     (assoc-ref inputs
+                                                  "guile-bytestructures"))
                                (ssh    (assoc-ref inputs "guile-ssh"))
                                (gnutls (assoc-ref inputs "gnutls"))
-                               (deps   (list json gnutls git ssh))
+                               (deps   (list json gnutls git bs ssh))
                                (effective
                                 (read-line
                                  (open-pipe* OPEN_READ