app/twitter: refactor +twitter/quit commands

This commit is contained in:
Henrik Lissner 2017-04-10 22:26:33 -04:00
parent ac101e3af6
commit 4eeb562bc1

View file

@ -15,17 +15,17 @@
;;;###autoload ;;;###autoload
(defun +twitter/quit () (defun +twitter/quit ()
(interactive) (interactive)
(call-interactively 'twittering-kill-buffer) (when (eq major-mode 'twittering-mode)
(+workspace/close-window-or-workspace)) (twittering-kill-buffer)
(+workspace/close-window-or-workspace)))
;;;###autoload ;;;###autoload
(defun +twitter/quit-all () (defun +twitter/quit-all ()
(interactive) (interactive)
(if (equal (+workspace-current-name) "Twitter")
(+workspace/delete "Twitter") (+workspace/delete "Twitter")
(dolist (buf (doom-buffers-in-mode 'twittering-mode)) (dolist (buf (doom-buffers-in-mode 'twittering-mode))
(with-current-buffer buf (with-current-buffer buf
(twittering-kill-buffer))))) (twittering-kill-buffer))))
;;;###autoload ;;;###autoload
(defun +twitter/rerender-all () (defun +twitter/rerender-all ()