From: Francois Fleuret <francois@fleuret.org>
Date: Tue, 10 Mar 2015 10:54:29 +0000 (+0100)
Subject: Added the current time when printing the name of a new song in the current stream.
X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?a=commitdiff_plain;h=07db79d3356b94d9c1c6f69561fcbc2d89f4aa17;p=elisp.git

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

diff --git a/media-mplayer.el b/media-mplayer.el
index 4a6209f..a6cd0e9 100644
--- 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)))
 
              ;; ----------------------------------------