aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMichael Olson <mwolson@gnu.org>2007-03-02 15:21:00 +0000
committerMichael Olson <mwolson@gnu.org>2007-03-02 15:21:00 +0000
commit53cbbecf7d49adf53b639df13df099f446f8a1ac (patch)
tree2a32fcd28f02e9e2e143abbd0d38d4682c7f2790
parent9b41cd71d5ad068c02ccbfaf41cac9a7fd5e4696 (diff)
emms-lyrics: Fix compiler warnings
darcs-hash:20070302152148-1bfb2-a126cf94fafb664291114af7e187626aedb7466d.gz
-rw-r--r--emms-lyrics.el14
1 files changed, 7 insertions, 7 deletions
diff --git a/emms-lyrics.el b/emms-lyrics.el
index 56dc0a6..32025d9 100644
--- a/emms-lyrics.el
+++ b/emms-lyrics.el
@@ -109,6 +109,12 @@ same as the music file) and this directory."
;;; User Interfaces
+(defvar emms-lyrics-display-p t
+ "If non-nil, will diplay lyrics.")
+
+(defvar emms-lyrics-mode-line-string ""
+ "Current lyric.")
+
;;;###autoload
(defun emms-lyrics-enable ()
"Enable displaying emms lyrics."
@@ -201,15 +207,12 @@ If we can't find it from local disk, then search it from internet."
(setq url (concat "http://search.lyrics.astraweb.com/?word="
;;"http://www.lyrics007.com/cgi-bin/s.cgi?q="
(replace-regexp-in-string " " "+" title)))
- (w3m-browse-url url)
+ (browse-url url)
(message "lyric file does not exist, search it from internet...done")))))
;;; EMMS Lyrics
-(defvar emms-lyrics-display-p t
- "If non-nil, will diplay lyrics.")
-
(defvar emms-lyrics-alist nil
"a list of the form: '((time0 . lyric0) (time1 . lyric1)...)). In
short, at time-i, display lyric-i.")
@@ -226,9 +229,6 @@ short, at time-i, display lyric-i.")
(defvar emms-lyrics-elapsed-time 0
"How long time has emms lyric played.")
-(defvar emms-lyrics-mode-line-string ""
- "Current lyric.")
-
(defvar emms-lyrics-scroll-timers nil
"Lyrics scroller timers.")