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:
Nicolas Graves 2025-05-18 10:16:18 +02:00 committed by Liliana Marie Prikler
parent f5d71418b1
commit 113e5d2b03
No known key found for this signature in database
GPG key ID: 442A84B8C70E2F87

View file

@ -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)