aboutsummaryrefslogtreecommitdiff
path: root/emms-player-mpg321-remote.el
diff options
context:
space:
mode:
authorYoni Rabkin <yoni@rabkins.net>2021-04-20 17:34:55 -0400
committerYoni Rabkin <yoni@rabkins.net>2021-04-20 17:34:55 -0400
commita51ac5b1fa967413d81530a722a5866eb43c4e4b (patch)
tree43dcf7f3389ae6091ec23f7b6c1dbbf14e6a9b8d /emms-player-mpg321-remote.el
parentf992e4c98b1d472acb802ea2a149f087c2656034 (diff)
Change the function quoting style to help the compiler.
Patch by Stefan Monnier
Diffstat (limited to 'emms-player-mpg321-remote.el')
-rw-r--r--emms-player-mpg321-remote.el12
1 files changed, 6 insertions, 6 deletions
diff --git a/emms-player-mpg321-remote.el b/emms-player-mpg321-remote.el
index a61b4a0..5ed942b 100644
--- a/emms-player-mpg321-remote.el
+++ b/emms-player-mpg321-remote.el
@@ -58,9 +58,9 @@ For example: (list \"-o\" \"alsa\")"
:type '(repeat string))
(defcustom emms-player-mpg321-remote
- (emms-player 'emms-player-mpg321-remote-start-playing
- 'emms-player-mpg321-remote-stop-playing
- 'emms-player-mpg321-remote-playable-p)
+ (emms-player #'emms-player-mpg321-remote-start-playing
+ #'emms-player-mpg321-remote-stop-playing
+ #'emms-player-mpg321-remote-playable-p)
"A player for EMMS."
:type '(cons symbol alist))
@@ -93,14 +93,14 @@ For example: (list \"-o\" \"alsa\")"
(defun emms-player-mpg321-remote-start-process ()
"Start a new remote process, and return the process."
- (let ((process (apply 'start-process
+ (let ((process (apply #'start-process
emms-player-mpg321-remote-process-name
nil
emms-player-mpg321-remote-command
(append emms-player-mpg321-remote-initial-args
emms-player-mpg321-remote-parameters))))
- (set-process-sentinel process 'emms-player-mpg321-remote-sentinel)
- (set-process-filter process 'emms-player-mpg321-remote-filter)
+ (set-process-sentinel process #'emms-player-mpg321-remote-sentinel)
+ (set-process-filter process #'emms-player-mpg321-remote-filter)
process))
(defun emms-player-mpg321-remote-stop ()