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

When receiving player' notification, retreive the currently playing song and notify it using the notify-send' program.

Browse source
This commit is contained in:
Renaud Casenave-Péré 2011-07-04 12:00:37 +09:00
parent df960f5b75
commit cee47ba827
1 changed files with 14 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
empc.el
View file

@ -141,7 +141,20 @@ form '('error (error-code . error-message))."
(empc-define-response-handler empc-response-parse-idle (closure msg)
"Parse message from idle interruption."
(setq empc-idle-state nil))
(setq empc-idle-state nil)
(dolist (cell (empc-response-parse-message msg))
(when (string= (car cell) "changed")
(let ((changed (cdr cell)))
(cond
((string= changed "player")
(empc-send "currentsong" nil 'empc-response-notify)))))))
(empc-define-response-handler empc-response-notify (closure msg)
"Notify the response using standard notification system."
(if (eq window-system 'x)
(shell-command (concat "notify-send "
" \"Music Player Daemon\" \"" msg "\""))
(message (concat "empc: " msg))))
(defun empc-initialize ()
"Initialize the client after connection.