Added the current time when printing the name of a new song in the current stream.

[elisp.git] / media-mplayer.el

diff --git a/media-mplayer.el b/media-mplayer.el
index 4a6209f..a6cd0e9 100644 (file)
--- a/media-mplayer.el
+++ b/media-mplayer.el
@@ -81,7 +81,7 @@ load Emacs less. Nil means no timing."
 
              ("ICY Info:" .
               (if (string-match "StreamTitle='\\([^']*\\)';" param)
-                  (message "Now in stream \"%s\"" (match-string 1 param))
+                  (message "Now in stream (%s) \"%s\"" (current-time-string) (match-string 1 param))
                 (message "ICY Info \"%s\"" param)))
 
              ;; ----------------------------------------