floss/empc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add a command to toggle pause by requesting first the server status.

Browse source
This commit is contained in:
Renaud Casenave-Péré 2011-06-28 19:09:50 +09:00
parent e7e51bf5d3
commit dd9c4decfb
1 changed files with 10 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
empc.el
View file

@ -185,12 +185,22 @@ Return nil if the line should be ignored."
(progn
(setq empc-default-crossfade status)
"0"))))))))))
(defun empc-send-pause (&optional state)
"Send pause to the server."
(interactive)
(if state
(empc-send (concat "pause " state))
(empc-update-status '(lambda (plist)
(if (eq (plist-get plist 'state) 'play)
(empc-send "pause 1")
(empc-send "pause 0"))))))
(define-simple-command "play")
(define-simple-command "stop")
(define-simple-command "next")
(define-simple-command "previous")
(define-toggle-command "consume")
(define-toggle-command "random")
(define-toggle-command "repeat")