diff options
Diffstat (limited to 'emms-streams.el')
-rw-r--r-- | emms-streams.el | 21 |
1 files changed, 10 insertions, 11 deletions
diff --git a/emms-streams.el b/emms-streams.el index d790069..9338216 100644 --- a/emms-streams.el +++ b/emms-streams.el @@ -431,17 +431,16 @@ about it, use this. Otherwise returns the name alone." (setq emms-track-initialize-functions '(emms-stream-add-data-to-track)) -;; emms-info-playlist is no more, anyone wish to fix this (Lukhas). -;; (when (featurep 'emms-info) -;; (eval-when-compile (require 'emms-info)) ; appease byte-compiler -;; (add-to-list 'emms-info-methods-list 'emms-info-playlist) -;; (defun emms-info-playlist-providep (track) -;; (if (eq (emms-track-type track) 'streamlist) -;; t -;; nil)) -;; (define-emms-info-method emms-info-streamlist ;; FIXME-PLS ? -;; :providep 'emms-info-streamlist-providep ;; FIXME-PLS ? -;; :get 'emms-info-url-get)) +(when (featurep 'emms-info) + (eval-when-compile (require 'emms-info)) ; appease byte-compiler + (add-to-list 'emms-info-methods-list 'emms-info-streamlist) + (defun emms-info-streamlist-providep (track) + (if (eq (emms-track-type track) 'streamlist) + t + nil)) + (define-emms-info-method emms-info-streamlist ;; FIXME-PLS ? + :providep 'emms-info-streamlist-providep ;; FIXME-PLS ? + :get 'emms-info-url-get)) (provide 'emms-streams) ;;; emms-streams.el ends here |