aboutsummaryrefslogtreecommitdiff
path: root/emms-source-file.el
diff options
context:
space:
mode:
authorMichael Olson <mwolson@gnu.org>2007-01-05 23:06:00 +0000
committerMichael Olson <mwolson@gnu.org>2007-01-05 23:06:00 +0000
commitef7fe16f8b6a1283012099998c4abea2818abd93 (patch)
treed9c7341d6376d418f603c24beebb1d623fa61731 /emms-source-file.el
parent11b83c0e196570462740e544d0b86bbce14a1c44 (diff)
Add support for playing Last.fm streams using emms-streams interface
darcs-hash:20070105230616-1bfb2-51c5cd5cdac1b0ab9daee569c4258296a030cdf3.gz
Diffstat (limited to 'emms-source-file.el')
-rw-r--r--emms-source-file.el11
1 files changed, 9 insertions, 2 deletions
diff --git a/emms-source-file.el b/emms-source-file.el
index e3c8a59..5384f4a 100644
--- a/emms-source-file.el
+++ b/emms-source-file.el
@@ -280,10 +280,17 @@ files) can play."
;;;###autoload (autoload 'emms-play-streamlist "emms-source-file" nil t)
;;;###autoload (autoload 'emms-add-streamlist "emms-source-file" nil t)
(define-emms-source streamlist (streamlist)
- "An EMMS source for streaming playlists (usually URLs ending in .pls."
- (interactive "sPlay URL: ")
+ "An EMMS source for streaming playlists (usually URLs ending in .pls)."
+ (interactive "sPlay streamlist URL: ")
(emms-playlist-insert-track (emms-track 'streamlist streamlist)))
+;;;###autoload (autoload 'emms-play-lastfm "emms-lastfm" nil t)
+;;;###autoload (autoload 'emms-add-lastfm "emms-lastfm" nil t)
+(define-emms-source lastfm (lastfm-url)
+ "An EMMS source for Last.fm URLs, which begin with lastfm://."
+ (interactive "sPlay Last.fm URL: ")
+ (emms-playlist-insert-track (emms-track 'lastfm lastfm-url)))
+
(provide 'emms-source-file)
;;; emms-source-file.el ends here