Change the function quoting style to help the compiler.

Patch by Stefan Monnier

1 files changed, 44 insertions, 43 deletions

diff --git a/emms-browser.el b/emms-browser.el
index 070efd4..78c9626 100644
--- a/emms-browser.el
+++ b/emms-browser.el
@@ -286,6 +286,7 @@
 (require 'cl-lib)
 (require 'emms)
 (require 'emms-cache)
+(require 'emms-volume)
 (require 'emms-source-file)
 (require 'emms-playlist-sort)
 (require 'sort)
@@ -422,55 +423,55 @@ Called once for each directory."
 
 (defvar emms-browser-mode-map
   (let ((map (make-sparse-keymap)))
-    (define-key map (kbd "q") 'emms-browser-bury-buffer)
-    (define-key map (kbd "/") 'emms-isearch-buffer)
-    (define-key map (kbd "r") 'emms-browser-goto-random)
-    (define-key map (kbd "n") 'next-line)
-    (define-key map (kbd "p") 'previous-line)
-    (define-key map (kbd "C") 'emms-browser-clear-playlist)
-    (define-key map (kbd "?") 'describe-mode)
-    (define-key map (kbd "C-/") 'emms-playlist-mode-undo)
-    (define-key map (kbd "SPC") 'emms-browser-toggle-subitems)
-    (define-key map (kbd "^") 'emms-browser-move-up-level)
-    (define-key map (kbd "RET") 'emms-browser-add-tracks)
-    (define-key map (kbd "<C-return>") 'emms-browser-add-tracks-and-play)
-    (define-key map (kbd "C-j") 'emms-browser-add-tracks-and-play)
-    (define-key map (kbd "<tab>") 'emms-browser-next-non-track)
-    (define-key map (kbd "<backtab>") 'emms-browser-prev-non-track)
-    (define-key map (kbd "d") 'emms-browser-view-in-dired)
-    (define-key map (kbd "D") 'emms-browser-delete-files)
-    (define-key map (kbd "E") 'emms-browser-expand-all)
-    (define-key map (kbd "1") 'emms-browser-collapse-all)
-    (define-key map (kbd "2") 'emms-browser-expand-to-level-2)
-    (define-key map (kbd "3") 'emms-browser-expand-to-level-3)
-    (define-key map (kbd "4") 'emms-browser-expand-to-level-4)
-    (define-key map (kbd "b 1") 'emms-browse-by-artist)
-    (define-key map (kbd "b 2") 'emms-browse-by-album)
-    (define-key map (kbd "b 3") 'emms-browse-by-genre)
-    (define-key map (kbd "b 4") 'emms-browse-by-year)
-    (define-key map (kbd "b 5") 'emms-browse-by-composer)
-    (define-key map (kbd "b 6") 'emms-browse-by-performer)
-    (define-key map (kbd "s a") 'emms-browser-search-by-artist)
-    (define-key map (kbd "s c") 'emms-browser-search-by-composer)
-    (define-key map (kbd "s p") 'emms-browser-search-by-performer)
-    (define-key map (kbd "s A") 'emms-browser-search-by-album)
-    (define-key map (kbd "s t") 'emms-browser-search-by-title)
-    (define-key map (kbd "s s") 'emms-browser-search-by-names)
-    (define-key map (kbd "W A w") 'emms-browser-lookup-artist-on-wikipedia)
-    (define-key map (kbd "W C w") 'emms-browser-lookup-composer-on-wikipedia)
-    (define-key map (kbd "W P w") 'emms-browser-lookup-performer-on-wikipedia)
-    (define-key map (kbd "W a w") 'emms-browser-lookup-album-on-wikipedia)
-    (define-key map (kbd ">") 'emms-browser-next-filter)
-    (define-key map (kbd "<") 'emms-browser-previous-filter)
-    (define-key map (kbd "+") 'emms-volume-raise)
-    (define-key map (kbd "-") 'emms-volume-lower)
+    (define-key map (kbd "q") #'emms-browser-bury-buffer)
+    (define-key map (kbd "/") #'emms-isearch-buffer)
+    (define-key map (kbd "r") #'emms-browser-goto-random)
+    (define-key map (kbd "n") #'next-line)
+    (define-key map (kbd "p") #'previous-line)
+    (define-key map (kbd "C") #'emms-browser-clear-playlist)
+    (define-key map (kbd "?") #'describe-mode)
+    (define-key map (kbd "C-/") #'emms-playlist-mode-undo)
+    (define-key map (kbd "SPC") #'emms-browser-toggle-subitems)
+    (define-key map (kbd "^")   #'emms-browser-move-up-level)
+    (define-key map (kbd "RET") #'emms-browser-add-tracks)
+    (define-key map (kbd "<C-return>") #'emms-browser-add-tracks-and-play)
+    (define-key map (kbd "C-j") #'emms-browser-add-tracks-and-play)
+    (define-key map (kbd "<tab>") #'emms-browser-next-non-track)
+    (define-key map (kbd "<backtab>") #'emms-browser-prev-non-track)
+    (define-key map (kbd "d") #'emms-browser-view-in-dired)
+    (define-key map (kbd "D") #'emms-browser-delete-files)
+    (define-key map (kbd "E") #'emms-browser-expand-all)
+    (define-key map (kbd "1") #'emms-browser-collapse-all)
+    (define-key map (kbd "2") #'emms-browser-expand-to-level-2)
+    (define-key map (kbd "3") #'emms-browser-expand-to-level-3)
+    (define-key map (kbd "4") #'emms-browser-expand-to-level-4)
+    (define-key map (kbd "b 1") #'emms-browse-by-artist)
+    (define-key map (kbd "b 2") #'emms-browse-by-album)
+    (define-key map (kbd "b 3") #'emms-browse-by-genre)
+    (define-key map (kbd "b 4") #'emms-browse-by-year)
+    (define-key map (kbd "b 5") #'emms-browse-by-composer)
+    (define-key map (kbd "b 6") #'emms-browse-by-performer)
+    (define-key map (kbd "s a") #'emms-browser-search-by-artist)
+    (define-key map (kbd "s c") #'emms-browser-search-by-composer)
+    (define-key map (kbd "s p") #'emms-browser-search-by-performer)
+    (define-key map (kbd "s A") #'emms-browser-search-by-album)
+    (define-key map (kbd "s t") #'emms-browser-search-by-title)
+    (define-key map (kbd "s s") #'emms-browser-search-by-names)
+    (define-key map (kbd "W A w") #'emms-browser-lookup-artist-on-wikipedia)
+    (define-key map (kbd "W C w") #'emms-browser-lookup-composer-on-wikipedia)
+    (define-key map (kbd "W P w") #'emms-browser-lookup-performer-on-wikipedia)
+    (define-key map (kbd "W a w") #'emms-browser-lookup-album-on-wikipedia)
+    (define-key map (kbd ">") #'emms-browser-next-filter)
+    (define-key map (kbd "<") #'emms-browser-previous-filter)
+    (define-key map (kbd "+") #'emms-volume-raise)
+    (define-key map (kbd "-") #'emms-volume-lower)
     map)
   "Keymap for `emms-browser-mode'.")
 
 (defvar emms-browser-search-mode-map
   (let ((map (make-sparse-keymap)))
     (set-keymap-parent map emms-browser-mode-map)
-    (define-key map (kbd "q") 'emms-browser-kill-search)
+    (define-key map (kbd "q") #'emms-browser-kill-search)
     map)
   "Keymap for `emms-browser-mode'.")