mirror of
https://codeberg.org/guix/guix.git
synced 2025-10-02 02:15:12 +00:00
gnu: emacs-everywhere: Improve style.
* gnu/packages/emacs-xyz.scm (emacs-everywhere): [arguments]<phases>: Factorize 'patch-exec-paths substitution. Signed-off-by: Ian Eure <ian@retrospec.tv>
This commit is contained in:
parent
f5d71418b1
commit
113e5d2b03
1 changed files with 3 additions and 15 deletions
|
@ -37439,21 +37439,9 @@ Emacs windows and tmux panes.")
|
|||
(add-after 'unpack 'patch-exec-paths
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(substitute* "emacs-everywhere.el"
|
||||
(("\"xclip\"")
|
||||
(string-append "\""
|
||||
(search-input-file inputs "/bin/xclip")
|
||||
"\""))
|
||||
(("\"xdotool\"")
|
||||
(string-append "\""
|
||||
(search-input-file inputs "/bin/xdotool")
|
||||
"\""))
|
||||
(("\"xprop\"")
|
||||
(string-append "\""
|
||||
(search-input-file inputs "/bin/xprop")
|
||||
"\""))
|
||||
(("\"xwininfo\"")
|
||||
(string-append "\""
|
||||
(search-input-file inputs "/bin/xwininfo")
|
||||
(("\"(xclip|xdotool|xprop|xwininfo)\"" all binary)
|
||||
(string-append "\"" (search-input-file
|
||||
inputs (string-append "bin/" binary))
|
||||
"\""))))))))
|
||||
(inputs (list xclip xdotool xprop xwininfo))
|
||||
(build-system emacs-build-system)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue