me
/
guix
Archived
1
0
Fork 0
Code

gnu: emacs-pulseaudio-control: Improve package style. 

* gnu/packages/emacs-xyz.scm (emacs-pulseaudio-control)[arguments]: Use
G-expressions.
[synopsis, description]: Use proper capitalization.
master
Nicolas Goaziou 2023-01-29 15:27:23 +01:00
parent b988392096
commit 4eabed5837
No known key found for this signature in database
GPG Key ID: DA00B4F048E92F2D
1 changed files with 10 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
gnu/packages/emacs-xyz.scm
View File

@ -21515,18 +21515,19 @@ orient yourself in the code, and tell which statements are at a given level.")
"0wm312pqp0i5i6qh6g3nacnnvsrad58927cl2g42gxzrzlb3slv5")))) "0wm312pqp0i5i6qh6g3nacnnvsrad58927cl2g42gxzrzlb3slv5"))))
(build-system emacs-build-system) (build-system emacs-build-system)
(arguments (arguments
'(#:phases (modify-phases %standard-phases (list
(add-after 'unpack 'patch-file-name #:phases #~(modify-phases %standard-phases
(lambda* (#:key inputs #:allow-other-keys) (add-after 'unpack 'patch-file-name
(let ((pulseaudio (assoc-ref inputs "pulseaudio"))) (lambda* (#:key inputs #:allow-other-keys)
(emacs-substitute-variables "pulseaudio-control.el" (let ((pulseaudio (assoc-ref inputs "pulseaudio")))
("pulseaudio-control-pactl-path" (emacs-substitute-variables "pulseaudio-control.el"
(string-append pulseaudio "/bin/pactl"))))))))) ("pulseaudio-control-pactl-path"
(string-append pulseaudio "/bin/pactl")))))))))
(inputs (list pulseaudio)) (inputs (list pulseaudio))
(home-page "https://git.sr.ht/~flexibeast/pulseaudio-control") (home-page "https://git.sr.ht/~flexibeast/pulseaudio-control")
(synopsis "Control @code{pulseaudio} from Emacs") (synopsis "Control Pulseaudio from Emacs")
(description (description
"This package allows controlling @code{pulseaudio} from Emacs.") "This package allows controlling Pulseaudio from Emacs.")
(license license:gpl3+)))) (license license:gpl3+))))
(define-public emacs-pulsar (define-public emacs-pulsar