aboutsummaryrefslogtreecommitdiff
path: root/emms-lastfm.el
diff options
context:
space:
mode:
authorMichael Olson <mwolson@gnu.org>2006-12-07 14:35:00 +0000
committerMichael Olson <mwolson@gnu.org>2006-12-07 14:35:00 +0000
commit3c42fe2cc29a102faddc818a74fac9dfe34bbeac (patch)
tree693ad5b37263b7924472c61e8ddbec72f8cb45c0 /emms-lastfm.el
parenta37a70fffeeb70f42964a3d24d508c32eee2ec0b (diff)
Fix various byte-compiler warnings throughout
darcs-hash:20061207143511-1bfb2-90e8bee5074d6ef5ca4c9998886d28eedf6df671.gz
Diffstat (limited to 'emms-lastfm.el')
-rw-r--r--emms-lastfm.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/emms-lastfm.el b/emms-lastfm.el
index c4e6703..1dcf9db 100644
--- a/emms-lastfm.el
+++ b/emms-lastfm.el
@@ -46,6 +46,7 @@
;; needed.
(require 'url)
+(require 'emms)
(defvar emms-lastfm-username ""
"Your last.fm username")
@@ -62,6 +63,7 @@ procedure. Only for internal use.")
;; used internally
(defvar emms-lastfm-buffer nil "-- only used internally --")
+(defvar emms-lastfm-process nil "-- only used internally --")
(defvar emms-lastfm-md5-challenge nil "-- only used internally --")
(defvar emms-lastfm-submit-url nil "-- only used internally --")
(defvar emms-lastfm-current-track nil "-- only used internally --")
@@ -157,7 +159,7 @@ well or if an error occured."
(if (not (string-match (rx (or "UPTODATE""UPDATE")) response))
(progn
(cond ((string-match "FAILED" response)
- (message "EMMS: Handshake failed: %s.") response)
+ (message "EMMS: Handshake failed: %s." response))
((string-match "BADUSER" response)
(message "EMMS: Wrong username."))))
(when (string-match "UPDATE" response)