mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-14 23:20:29 -05:00
gnu: clipmenu: Set #:guile argument of 'wrap-script'.
* gnu/packages/xdisorg.scm (clipmenu)[arguments]<#:phases>{wrap-script}: Set #:guile argument of ‘wrap-script’. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
parent
0758ee8002
commit
a4e38cc216
1 changed files with 3 additions and 1 deletions
|
@ -2555,10 +2555,12 @@ (define-public clipmenu
|
||||||
(gawk (assoc-ref inputs "gawk"))
|
(gawk (assoc-ref inputs "gawk"))
|
||||||
(util-linux (assoc-ref inputs "util-linux"))
|
(util-linux (assoc-ref inputs "util-linux"))
|
||||||
(xdotool (assoc-ref inputs "xdotool"))
|
(xdotool (assoc-ref inputs "xdotool"))
|
||||||
(xsel (assoc-ref inputs "xsel")))
|
(xsel (assoc-ref inputs "xsel"))
|
||||||
|
(guile (search-input-file inputs "bin/guile")))
|
||||||
(for-each
|
(for-each
|
||||||
(lambda (prog)
|
(lambda (prog)
|
||||||
(wrap-script (string-append out "/bin/" prog)
|
(wrap-script (string-append out "/bin/" prog)
|
||||||
|
#:guile guile
|
||||||
`("PATH" ":" prefix
|
`("PATH" ":" prefix
|
||||||
,(map (lambda (dir)
|
,(map (lambda (dir)
|
||||||
(string-append dir "/bin"))
|
(string-append dir "/bin"))
|
||||||
|
|
Loading…
Reference in a new issue