aboutsummaryrefslogtreecommitdiff
path: root/emms-player-simple.el
diff options
context:
space:
mode:
authormlang <mlang>2006-09-28 21:15:00 +0000
committermlang <mwolson@gnu.org>2006-09-28 21:15:00 +0000
commit7b7a768aef113ce97c36f989d3e59acf48696ea6 (patch)
tree0362bfd5558013cad984613ac53af51891ba53eb /emms-player-simple.el
parent7185a592e9276a5593d35cb1f4222d169516404b (diff)
pause-for-alsaplayer
Get pause/resume working for alsaplayer darcs-hash:20060928211555-08870-3dc3638f98fa28d080d98d4fbb874ef2afa68af9.gz
Diffstat (limited to 'emms-player-simple.el')
-rw-r--r--emms-player-simple.el12
1 files changed, 12 insertions, 0 deletions
diff --git a/emms-player-simple.el b/emms-player-simple.el
index 985d3ed..17611eb 100644
--- a/emms-player-simple.el
+++ b/emms-player-simple.el
@@ -182,5 +182,17 @@ PLAYER is the name of the current player."
(emms-player-simple-regexp ".ogg" ".mp3" ".wav" ".flac" ".pls" ".m3u" "http://")
"alsaplayer" "--quiet" "--nosave" "\"--interface text\"")
+(emms-player-set emms-player-alsaplayer
+ 'pause
+ 'emms-player-alsaplayer-pause)
+
+;;; Pause is also resume for alsaplayer
+(emms-player-set emms-player-alsaplayer
+ 'resume
+ nil)
+
+(defun emms-player-alsaplayer-pause ()
+ (call-process "alsaplayer" nil nil nil "--pause"))
+
(provide 'emms-player-simple)
;;; emms-player-simple.el ends here