From 3c42fe2cc29a102faddc818a74fac9dfe34bbeac Mon Sep 17 00:00:00 2001 From: Michael Olson Date: Thu, 7 Dec 2006 14:35:00 +0000 Subject: Fix various byte-compiler warnings throughout darcs-hash:20061207143511-1bfb2-90e8bee5074d6ef5ca4c9998886d28eedf6df671.gz --- emms-lastfm.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'emms-lastfm.el') 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) -- cgit v1.2.3