aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorYuchen Pei <me@ypei.me>2021-08-04 16:07:04 +1000
committerYuchen Pei <me@ypei.me>2021-08-04 16:07:04 +1000
commitfbff34707386c6d2b0f3a3d37c5392894cd5e96e (patch)
tree3e148836e39c22ef6b9c94f2b4ed6f1802838074
parent8b32529950e5a2e1dd7afed8757ff6bc923c95e2 (diff)
Adding defaulting url to url at point to emms-add-url
-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..56755af 100644
--- a/emms-source-file.el
+++ b/emms-source-file.el
@@ -293,7 +293,8 @@ 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)