(emms-lastfm-radio-request-metadata-sentinel): Let `emms-track-updated' take care of updating track info.

darcs-hash:20080212041204-cfa61-b9e5ee5ad4e09a6ebe583e796e573abd18b0afa3.gz

1 files changed, 5 insertions, 4 deletions

diff --git a/emms-lastfm.el b/emms-lastfm.el
index cb9b27f..2f86a8c 100644
--- a/emms-lastfm.el
+++ b/emms-lastfm.el
@@ -637,11 +637,12 @@ If DATA is given, it should be a list."
   (let ((buffer (current-buffer)))
     (emms-http-decode-buffer buffer)
     (let ((artist (emms-key-value "artist" buffer))
-          (title  (emms-key-value "track" buffer)))
+          (title  (emms-key-value "track" buffer))
+          (track (emms-playlist-current-selected-track)))
       (kill-buffer buffer)
-      (setq emms-mode-line-string (format emms-mode-line-format
-                                          (concat artist " - " title)))
-      (force-mode-line-update))))
+      (emms-track-set track 'info-artist artist)
+      (emms-track-set track 'info-title title)
+      (emms-track-updated track))))
 
 
 ;;; Utility functions