Kill the log buffer when empc quits.
This commit is contained in:
parent
a5f5e07a3b
commit
bb2fd85e51
1 changed files with 2 additions and 1 deletions
3
empc.el
3
empc.el
|
|
@ -210,7 +210,8 @@ SERVICE is the name of the service desired, or an integer specifying
|
||||||
"Close OBJECT: delete the process and kill the buffers."
|
"Close OBJECT: delete the process and kill the buffers."
|
||||||
(let ((buffer (process-buffer (empc-process object))))
|
(let ((buffer (process-buffer (empc-process object))))
|
||||||
(delete-process (empc-process object))
|
(delete-process (empc-process object))
|
||||||
(kill-buffer buffer)))
|
(kill-buffer buffer)
|
||||||
|
(kill-buffer (empc-log object))))
|
||||||
|
|
||||||
(defvar empc-song-format '(time "\t" (if (and artist title) (concat artist " - " title) file))
|
(defvar empc-song-format '(time "\t" (if (and artist title) (concat artist " - " title) file))
|
||||||
"Format used to express songs in playlist and browser.
|
"Format used to express songs in playlist and browser.
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue