diff options
author | forcer <forcer> | 2006-06-07 15:05:00 +0000 |
---|---|---|
committer | forcer <mwolson@gnu.org> | 2006-06-07 15:05:00 +0000 |
commit | 37853487955cb1eb28220448e48d96f9125c3685 (patch) | |
tree | f6d54ecf6a39bf70a12fb94c607eec659c34e297 /emms.el | |
parent | 7adf8d8e0913179aeedd93d8947f664456e94947 (diff) |
emms sources now switch add/play behavior when a prefix argument is supplied.
darcs-hash:20060607150502-2189f-111d096517e1b849d49e7f196852e51937a31b58.gz
Diffstat (limited to 'emms.el')
-rw-r--r-- | emms.el | 10 |
1 files changed, 8 insertions, 2 deletions
@@ -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 |