diff options
| -rw-r--r-- | emms-bookmarks.el | 4 | ||||
| -rw-r--r-- | emms-player-mpd.el | 5 | ||||
| -rw-r--r-- | emms-stream-info.el | 2 |
3 files changed, 6 insertions, 5 deletions
diff --git a/emms-bookmarks.el b/emms-bookmarks.el index 5bbd9aa..e5e20b3 100644 --- a/emms-bookmarks.el +++ b/emms-bookmarks.el @@ -100,8 +100,8 @@ FAILURE-MESSAGE should be a string." (if m (progn (emms-player-seek-to (cdr m)) - (message (car m))) - (message failure-message)))) + (message "%s" (car m))) + (message "%s" failure-message)))) ;; entry points 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)) diff --git a/emms-stream-info.el b/emms-stream-info.el index aee486c..779bbbc 100644 --- a/emms-stream-info.el +++ b/emms-stream-info.el @@ -334,7 +334,7 @@ not output a message and only return a string." (when (emms-stream-info-get-key "name") (if string-out str - (message str))))) + (message "%s" str))))) (defun emms-stream-info-pretty-print-insert () "Insert the formatted output of 'emms-stream-info-get' at point." |