aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--emms-source-file.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/emms-source-file.el b/emms-source-file.el
index 9678b41..7186a92 100644
--- a/emms-source-file.el
+++ b/emms-source-file.el
@@ -45,6 +45,7 @@
(require 'locate)
(error nil)))
(require 'dired)
+(require 'thingatpt)
(defgroup emms-source-file nil
"*Sources for EMMS that use the file system."
@@ -293,7 +294,7 @@ files) can play."
;;;###autoload (autoload 'emms-add-url "emms-source-file" nil t)
(define-emms-source url (url)
"An EMMS source for an URL - for example, for streaming."
- (interactive "sPlay URL: ")
+ (interactive (list (read-string "Play URL: " (thing-at-point-url-at-point))))
(emms-playlist-insert-track (emms-track 'url url)))
;;;###autoload (autoload 'emms-play-streamlist "emms-source-file" nil t)