From c3037cc5b844ed16abf2b1f848780eed2da51fd5 Mon Sep 17 00:00:00 2001 From: William Xu Date: Tue, 20 Mar 2007 12:00:00 +0000 Subject: emms-source-playlist.el: emms-source-playlist-parse-m3u, emms-source-playlist-parse-pls recognize `mms://' as urls now. darcs-hash:20070320120017-cfa61-ecd17660c8ecdf95fd6bd6490a3f214a448cde92.gz --- emms-source-playlist.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/emms-source-playlist.el b/emms-source-playlist.el index bd4d527..3af669a 100644 --- a/emms-source-playlist.el +++ b/emms-source-playlist.el @@ -250,7 +250,7 @@ detected and simply return non-nil always." (defun emms-source-playlist-parse-m3u () "Parse the m3u playlist in the current buffer." (mapcar (lambda (file) - (if (string-match "\\`http://" file) + (if (string-match "\\`http://\\|\\`mms://" file) (emms-track 'url file) (emms-track 'file file))) (emms-source-playlist-m3u-files))) @@ -318,7 +318,7 @@ OUT should be the buffer where tracks are stored in m3u format." (defun emms-source-playlist-parse-pls () "Parse the pls playlist in the current buffer." (mapcar (lambda (file) - (if (string-match "\\`http://" file) + (if (string-match "\\`http://\\|\\`mms://" file) (emms-track 'url file) (emms-track 'file file))) (emms-source-playlist-pls-files))) -- cgit v1.2.3