aboutsummaryrefslogtreecommitdiff
path: root/emms-playlist-mode.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-playlist-mode.el
parentf992e4c98b1d472acb802ea2a149f087c2656034 (diff)
Change the function quoting style to help the compiler.
Patch by Stefan Monnier
Diffstat (limited to 'emms-playlist-mode.el')
-rw-r--r--emms-playlist-mode.el76
1 files changed, 38 insertions, 38 deletions
diff --git a/emms-playlist-mode.el b/emms-playlist-mode.el
index 9692f19..2815a56 100644
--- a/emms-playlist-mode.el
+++ b/emms-playlist-mode.el
@@ -110,41 +110,41 @@ This is true for every invocation of `emms-playlist-mode-go'."
(defvar emms-playlist-mode-map
(let ((map (make-sparse-keymap)))
(set-keymap-parent map text-mode-map)
- (define-key map (kbd "C-x C-s") 'emms-playlist-save)
- (define-key map (kbd "C-y") 'emms-playlist-mode-yank)
- (define-key map (kbd "C-k") 'emms-playlist-mode-kill-track)
- (define-key map (kbd "C-w") 'emms-playlist-mode-kill)
- (define-key map (kbd "C-_") 'emms-playlist-mode-undo)
- (define-key map (kbd "C-/") 'emms-playlist-mode-undo)
- (define-key map (kbd "C-x u") 'emms-playlist-mode-undo)
- (define-key map (kbd "C-n") 'next-line)
- (define-key map (kbd "C-p") 'previous-line)
- (define-key map (kbd "C-j") 'emms-playlist-mode-insert-newline)
- (define-key map (kbd "M-y") 'emms-playlist-mode-yank-pop)
- (define-key map (kbd "M-<") 'emms-playlist-mode-first)
- (define-key map (kbd "M->") 'emms-playlist-mode-last)
- (define-key map (kbd "M-n") 'emms-playlist-mode-next)
- (define-key map (kbd "M-p") 'emms-playlist-mode-previous)
- (define-key map (kbd "a") 'emms-playlist-mode-add-contents)
- (define-key map (kbd "b") 'emms-playlist-set-playlist-buffer)
- (define-key map (kbd "D") 'emms-playlist-mode-kill-track)
- (define-key map (kbd "n") 'emms-next)
- (define-key map (kbd "p") 'emms-previous)
- (define-key map (kbd "SPC") 'scroll-up)
- (define-key map (kbd ">") 'emms-seek-forward)
- (define-key map (kbd "<") 'emms-seek-backward)
- (define-key map (kbd "P") 'emms-pause)
- (define-key map (kbd "s") 'emms-stop)
- (define-key map (kbd "f") 'emms-show)
- (define-key map (kbd "c") 'emms-playlist-mode-center-current)
- (define-key map (kbd "q") 'emms-playlist-mode-bury-buffer)
- (define-key map (kbd "K") 'emms-playlist-mode-current-kill)
- (define-key map (kbd "?") 'describe-mode)
- (define-key map (kbd "r") 'emms-random)
- (define-key map (kbd "C") 'emms-playlist-clear)
- (define-key map (kbd "d") 'emms-playlist-mode-goto-dired-at-point)
- (define-key map (kbd "<mouse-2>") 'emms-playlist-mode-play-current-track)
- (define-key map (kbd "RET") 'emms-playlist-mode-play-smart)
+ (define-key map (kbd "C-x C-s") #'emms-playlist-save)
+ (define-key map (kbd "C-y") #'emms-playlist-mode-yank)
+ (define-key map (kbd "C-k") #'emms-playlist-mode-kill-track)
+ (define-key map (kbd "C-w") #'emms-playlist-mode-kill)
+ (define-key map (kbd "C-_") #'emms-playlist-mode-undo)
+ (define-key map (kbd "C-/") #'emms-playlist-mode-undo)
+ (define-key map (kbd "C-x u") #'emms-playlist-mode-undo)
+ (define-key map (kbd "C-n") #'next-line)
+ (define-key map (kbd "C-p") #'previous-line)
+ (define-key map (kbd "C-j") #'emms-playlist-mode-insert-newline)
+ (define-key map (kbd "M-y") #'emms-playlist-mode-yank-pop)
+ (define-key map (kbd "M-<") #'emms-playlist-mode-first)
+ (define-key map (kbd "M->") #'emms-playlist-mode-last)
+ (define-key map (kbd "M-n") #'emms-playlist-mode-next)
+ (define-key map (kbd "M-p") #'emms-playlist-mode-previous)
+ (define-key map (kbd "a") #'emms-playlist-mode-add-contents)
+ (define-key map (kbd "b") #'emms-playlist-set-playlist-buffer)
+ (define-key map (kbd "D") #'emms-playlist-mode-kill-track)
+ (define-key map (kbd "n") #'emms-next)
+ (define-key map (kbd "p") #'emms-previous)
+ (define-key map (kbd "SPC") #'scroll-up)
+ (define-key map (kbd ">") #'emms-seek-forward)
+ (define-key map (kbd "<") #'emms-seek-backward)
+ (define-key map (kbd "P") #'emms-pause)
+ (define-key map (kbd "s") #'emms-stop)
+ (define-key map (kbd "f") #'emms-show)
+ (define-key map (kbd "c") #'emms-playlist-mode-center-current)
+ (define-key map (kbd "q") #'emms-playlist-mode-bury-buffer)
+ (define-key map (kbd "K") #'emms-playlist-mode-current-kill)
+ (define-key map (kbd "?") #'describe-mode)
+ (define-key map (kbd "r") #'emms-random)
+ (define-key map (kbd "C") #'emms-playlist-clear)
+ (define-key map (kbd "d") #'emms-playlist-mode-goto-dired-at-point)
+ (define-key map (kbd "<mouse-2>") #'emms-playlist-mode-play-current-track)
+ (define-key map (kbd "RET") #'emms-playlist-mode-play-smart)
map)
"Keymap for `emms-playlist-mode'.")
@@ -594,11 +594,11 @@ WINDOW-WIDTH should be a positive integer."
mode-name "EMMS")
(setq emms-playlist-insert-track-function
- 'emms-playlist-mode-insert-track)
+ #'emms-playlist-mode-insert-track)
(setq emms-playlist-update-track-function
- 'emms-playlist-mode-update-track-function)
+ #'emms-playlist-mode-update-track-function)
(add-hook 'emms-playlist-selection-changed-hook
- 'emms-playlist-mode-overlay-selected)
+ #'emms-playlist-mode-overlay-selected)
(emms-playlist-mode-startup)