mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-23 19:19:20 -05:00
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.
This commit is contained in:
parent
91c619ebdf
commit
dd1640eed6
1 changed files with 5 additions and 3 deletions
|
@ -196,15 +196,17 @@ (define (copy arch)
|
||||||
#t))
|
#t))
|
||||||
(add-after 'install 'wrap-program
|
(add-after 'install 'wrap-program
|
||||||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||||||
;; Make sure the 'guix' command finds GnuTLS and
|
;; Make sure the 'guix' command finds GnuTLS,
|
||||||
;; Guile-JSON automatically.
|
;; Guile-JSON, and Guile-Git automatically.
|
||||||
(let* ((out (assoc-ref outputs "out"))
|
(let* ((out (assoc-ref outputs "out"))
|
||||||
(guile (assoc-ref inputs "guile"))
|
(guile (assoc-ref inputs "guile"))
|
||||||
(json (assoc-ref inputs "guile-json"))
|
(json (assoc-ref inputs "guile-json"))
|
||||||
(git (assoc-ref inputs "guile-git"))
|
(git (assoc-ref inputs "guile-git"))
|
||||||
|
(bs (assoc-ref inputs
|
||||||
|
"guile-bytestructures"))
|
||||||
(ssh (assoc-ref inputs "guile-ssh"))
|
(ssh (assoc-ref inputs "guile-ssh"))
|
||||||
(gnutls (assoc-ref inputs "gnutls"))
|
(gnutls (assoc-ref inputs "gnutls"))
|
||||||
(deps (list json gnutls git ssh))
|
(deps (list json gnutls git bs ssh))
|
||||||
(effective
|
(effective
|
||||||
(read-line
|
(read-line
|
||||||
(open-pipe* OPEN_READ
|
(open-pipe* OPEN_READ
|
||||||
|
|
Loading…
Reference in a new issue