TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

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

Browse source 
* gnu/packages/emacs-xyz.scm (emacs-pulseaudio-control)[arguments]: Use
G-expressions.
[synopsis, description]: Use proper capitalization.
This commit is contained in:
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 @@ (define-public emacs-pulseaudio-control
"0wm312pqp0i5i6qh6g3nacnnvsrad58927cl2g42gxzrzlb3slv5"))))
(build-system emacs-build-system)
(arguments
'(#: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")))))))))
(list
#: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")))))))))
(inputs (list pulseaudio))
(home-page "https://git.sr.ht/~flexibeast/pulseaudio-control")
(synopsis "Control @code{pulseaudio} from Emacs")
(synopsis "Control Pulseaudio from Emacs")
(description
"This package allows controlling @code{pulseaudio} from Emacs.")
"This package allows controlling Pulseaudio from Emacs.")
(license license:gpl3+))))
(define-public emacs-pulsar