app/irc: clean up timer & notifications on quit

This commit is contained in:
Henrik Lissner 2017-06-12 14:35:41 +02:00
parent 7f76dabfd0
commit 01dc170e5b
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 8 additions and 1 deletions

View file

@ -28,6 +28,8 @@ playback.")
`(cl-pushnew (cons ,server ,letvars) +irc-connections
:test #'equal :key #'car))
(defvar +irc--defer-timer nil)
;;
;; Plugins
@ -141,7 +143,9 @@ playback.")
:init
(if +irc-defer-notifications
(add-hook! 'circe-server-connected-hook
(run-at-time +irc-defer-notifications nil #'enable-circe-notifications))
(setq +irc--defer-timer
(run-at-time +irc-defer-notifications nil
#'enable-circe-notifications)))
(add-hook 'circe-server-connected-hook #'enable-circe-notifications))
:config
(setq circe-notifications-watch-strings +irc-notifications-watch-strings