From c3d98fc234cf7ec751c78a63a467449ccfd74376 Mon Sep 17 00:00:00 2001 From: Rasmus Date: Wed, 21 Dec 2016 14:32:44 +0100 Subject: * lisp/emms-lyrics.el (emms-lyrics-visit-lyric): Fix error from 6bc5 --- lisp/emms-lyrics.el | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'lisp') diff --git a/lisp/emms-lyrics.el b/lisp/emms-lyrics.el index 6325ceb..95b8e29 100644 --- a/lisp/emms-lyrics.el +++ b/lisp/emms-lyrics.el @@ -237,18 +237,18 @@ If we can't find it from local disk, then search it from internet." ;; systems, we'd better fall back on filename. (format emms-lyrics-chinese-url (emms-url-quote-plus - (encode-coding-string filename 'gb2312)))) - (t ; English lyrics. + (encode-coding-string name 'gb2312)))) + (t ; English lyrics.g (format emms-lyrics-latin-url (if artist (concat (emms-url-quote-underscore artist) ":") "") (emms-url-quote-underscore title)))))) (if (fboundp 'eww) - (let ((readable-hook (when (and (fboundp 'eww-readable) - (not (memq 'eww-readable eww-after-render-hook))) - (add-hook 'eww-after-render-hook 'eww-readable)))) - (eww url) - (when readable-hook - (remove-hook 'eww-after-render-hook 'eww-readable))) + (progn (require 'eww) + (let ((readable-hook (when (fboundp 'eww-readable) + (add-hook 'eww-after-render-hook 'eww-readable)))) + (eww url) + (when readable-hook + (remove-hook 'eww-after-render-hook 'eww-readable)))) (browse-url url)) (message "Lyric file does not exist on file-system. Searching online..."))))) -- cgit v1.2.3