diff options
author | Michael Olson <mwolson@gnu.org> | 2006-12-07 14:35:00 +0000 |
---|---|---|
committer | Michael Olson <mwolson@gnu.org> | 2006-12-07 14:35:00 +0000 |
commit | 3c42fe2cc29a102faddc818a74fac9dfe34bbeac (patch) | |
tree | 693ad5b37263b7924472c61e8ddbec72f8cb45c0 /emms-lastfm.el | |
parent | a37a70fffeeb70f42964a3d24d508c32eee2ec0b (diff) |
Fix various byte-compiler warnings throughout
darcs-hash:20061207143511-1bfb2-90e8bee5074d6ef5ca4c9998886d28eedf6df671.gz
Diffstat (limited to 'emms-lastfm.el')
-rw-r--r-- | emms-lastfm.el | 4 |
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) |