aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorforcer <forcer>2005-09-12 15:03:00 +0000
committerforcer <mwolson@gnu.org>2005-09-12 15:03:00 +0000
commit79dc6ebe7d16b3a85f90e1846bf31c0e4e5629a8 (patch)
tree032c382811d15d2e643e2cf52256a7c3852b0592
parent6b60d175cdd429140b5c35cfb32005a7e2b1a76b (diff)
emms-stream-info.el: Use emms-playlist-selected-track.
darcs-hash:20050912150302-2189f-87c1942fd76673c2bfcb3e4c06a5a15d03e68e06.gz
-rw-r--r--emms-stream-info.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/emms-stream-info.el b/emms-stream-info.el
index 59a5b6d..09253ff 100644
--- a/emms-stream-info.el
+++ b/emms-stream-info.el
@@ -691,11 +691,11 @@ Optional argument CONT boolean."
;; Users. You can never tell what they are going to use as input.
(defun emms-stream-info-input-sanity (&optional urlstring)
- (let ((type (emms-track-type (emms-playlist-current-track))))
+ (let ((type (emms-track-type (emms-playlist-selected-track))))
(cond ((null urlstring)
(if (or (equal type 'playlist)
(equal type 'url))
- (emms-track-name (emms-playlist-current-track))))
+ (emms-track-name (emms-playlist-selected-track))))
((not (stringp urlstring))
(error "URL must be in string format"))
((stringp url) urlstring))))