[bug#78315,18/53] gnu: emacs-pulseaudio-control: Use search-input-file.

Message ID 20250508125104.26530-18-ngraves@ngraves.fr
State New
Headers
Series More fixes, and a lot of style improvements. |

Commit Message

Nicolas Graves May 8, 2025, 12:50 p.m. UTC
  * gnu/packages/emacs-xyz.scm (emacs-pulseaudio-control):
  [arguments]<phases>: Improve 'patch-file-name style.
---
 gnu/packages/emacs-xyz.scm | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)
  

Patch

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 6af0109b5d..026f04464a 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -27201,10 +27201,9 @@  (define-public emacs-pulseaudio-control
         #:phases #~(modify-phases %standard-phases
                      (add-after 'unpack 'patch-file-name
                        (lambda* (#:key inputs #:allow-other-keys)
-                         (let ((pulseaudio (assoc-ref inputs "pulseaudio")))
-                           (emacs-substitute-variables "pulseaudio-control.el"
-                             ("pulseaudio-control-pactl-path"
-                              (string-append pulseaudio "/bin/pactl")))))))))
+                         (emacs-substitute-variables "pulseaudio-control.el"
+                           ("pulseaudio-control-pactl-path"
+                            (search-input-file inputs "bin/pactl"))))))))
       (inputs (list pulseaudio))
       (home-page "https://git.sr.ht/~flexibeast/pulseaudio-control")
       (synopsis "Control Pulseaudio from Emacs")