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-lyrics.el | |
| parent | f992e4c98b1d472acb802ea2a149f087c2656034 (diff) | |
Change the function quoting style to help the compiler.
Patch by Stefan Monnier
Diffstat (limited to 'emms-lyrics.el')
| -rw-r--r-- | emms-lyrics.el | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/emms-lyrics.el b/emms-lyrics.el index 9c0304a..8d482ec 100644 --- a/emms-lyrics.el +++ b/emms-lyrics.el @@ -235,10 +235,11 @@ If we can't find it from local disk, then search it from internet." (if (fboundp 'eww) (progn (require 'eww) (let ((readable-hook (when (fboundp 'eww-readable) - (add-hook 'eww-after-render-hook 'eww-readable)))) + (add-hook 'eww-after-render-hook #'eww-readable) + #'eww-readable))) (eww url) (when readable-hook - (remove-hook 'eww-after-render-hook 'eww-readable)))) + (remove-hook 'eww-after-render-hook readable-hook)))) (browse-url url)) (message "Lyric file does not exist on file-system. Searching online..."))))) @@ -422,7 +423,7 @@ job." (list (run-at-time (format "%d sec" time) nil - 'emms-lyrics-display-handler + #'emms-lyrics-display-handler lyric next-lyric line @@ -512,7 +513,7 @@ NEXT-LYRIC." (list (run-at-time time nil - 'emms-lyrics-display + #'emms-lyrics-display (if (>= (length lyric) pos) (substring scrolled-lyric pos) (throw 'return t)) @@ -525,9 +526,9 @@ NEXT-LYRIC." (defvar emms-lyrics-mode-map (let ((map (make-sparse-keymap))) - (define-key map "p" 'emms-lyrics-previous-line) - (define-key map "n" 'emms-lyrics-next-line) - (define-key map "i" 'emms-lyrics-insert-time) + (define-key map "p" #'emms-lyrics-previous-line) + (define-key map "n" #'emms-lyrics-next-line) + (define-key map "i" #'emms-lyrics-insert-time) map) "Keymap for `emms-lyrics-mode'.") |