diff options
author | Yoni Rabkin <yoni@rabkins.net> | 2021-04-20 17:34:55 -0400 |
---|---|---|
committer | Yoni Rabkin <yoni@rabkins.net> | 2021-04-20 17:34:55 -0400 |
commit | a51ac5b1fa967413d81530a722a5866eb43c4e4b (patch) | |
tree | 43dcf7f3389ae6091ec23f7b6c1dbbf14e6a9b8d /emms-volume-pulse.el | |
parent | f992e4c98b1d472acb802ea2a149f087c2656034 (diff) |
Change the function quoting style to help the compiler.
Patch by Stefan Monnier
Diffstat (limited to 'emms-volume-pulse.el')
-rw-r--r-- | emms-volume-pulse.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/emms-volume-pulse.el b/emms-volume-pulse.el index 10b8889..5211e69 100644 --- a/emms-volume-pulse.el +++ b/emms-volume-pulse.el @@ -1,6 +1,6 @@ ;;; emms-volume-pulse.el --- a mode for changing volume using PulseAudio pactl -*- lexical-binding: t; -*- -;; Copyright (C) 2015 Free Software Foundation, Inc. +;; Copyright (C) 2015-2021 Free Software Foundation, Inc. ;; Author: Rasmus Pank Roulund <emacs@pank.eu> @@ -73,12 +73,12 @@ See full list of devices on your system by running (car (reverse (funcall - (if sink-number-p 'assq 'assoc) + (if sink-number-p #'assq #'assoc) emms-volume-pulse-sink (mapcar (if sink-number-p 'identity 'cdr) (cl-loop while (string-match - (mapconcat 'identity + (mapconcat #'identity '(".*Sink[ \t]+\\#\\([0-9]+\\)" ".*Name:[ \t]\\([^\n]+\\)" ".*Volume:.*?\\([0-9]+\\)%.*\n?") |