aboutsummaryrefslogtreecommitdiff
path: root/emms.el
diff options
context:
space:
mode:
Diffstat (limited to 'emms.el')
-rw-r--r--emms.el10
1 files changed, 8 insertions, 2 deletions
diff --git a/emms.el b/emms.el
index cdc8a5d..28ece74 100644
--- a/emms.el
+++ b/emms.el
@@ -1088,11 +1088,17 @@ See emms-source-file.el for some examples."
(defun ,source-play ,arglist
,docstring
,interactive
- (emms-source-play ',source-name ,@call-args))
+ (if current-prefix-arg
+ (let ((current-prefix-arg nil))
+ (emms-source-add ',source-name ,@call-args))
+ (emms-source-play ',source-name ,@call-args)))
(defun ,source-add ,arglist
,docstring
,interactive
- (emms-source-add ',source-name ,@call-args))
+ (if current-prefix-arg
+ (let ((current-prefix-arg nil))
+ (emms-source-play ',source-name ,@call-args))
+ (emms-source-add ',source-name ,@call-args)))
(defun ,source-insert ,arglist
,docstring
,interactive