aboutsummaryrefslogtreecommitdiff
path: root/emms-player-mpd.el
diff options
context:
space:
mode:
authorMichael Olson <mwolson@gnu.org>2007-04-08 23:38:00 +0000
committerMichael Olson <mwolson@gnu.org>2007-04-08 23:38:00 +0000
commit715b5a5c569640cc5a293bc3bada078d562b43f2 (patch)
tree993f94d7fabb3607a59641543641764844fee4c3 /emms-player-mpd.el
parent7c05231415f877a3902f4f247b512c5373a08407 (diff)
Fix use of `message', silence mpd-show if callback given and no song playing
darcs-hash:20070408233853-1bfb2-c36da9a1961e7186ea3afd81445a011500cd7d64.gz
Diffstat (limited to 'emms-player-mpd.el')
-rw-r--r--emms-player-mpd.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/emms-player-mpd.el b/emms-player-mpd.el
index b5fb198..d96b031 100644
--- a/emms-player-mpd.el
+++ b/emms-player-mpd.el
@@ -642,7 +642,7 @@ MusicPD playlist."
(err-msg (cdr (assoc "error" info))))
(if (stringp err-msg)
(progn
- (message (concat "MusicPD error: " err-msg))
+ (message "MusicPD error: %s" err-msg)
(emms-player-mpd-send
"clearerror"
nil #'ignore))
@@ -1024,7 +1024,8 @@ positive or negative."
(concat desc ": " track-desc)
track-desc))))))
(if (not desc)
- (message "Nothing playing right now")
+ (unless (functionp callback)
+ (message "Nothing playing right now"))
(setq desc (format emms-show-format desc))
(cond ((functionp callback)
(funcall callback buffer desc))