alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

* mu4e-view: fix buffer quiting

Browse Source
This commit is contained in:
djcb
2012-06-16 10:45:51 +03:00
parent 095e471fe6
commit 523becb84c
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
emacs/mu4e-headers.el
View File

@ -1158,8 +1158,8 @@ region if there is a region, then move to the next message."
(mu4e-headers-next)) (mu4e-headers-next))
(defun mu4e~headers-quit-buffer () (defun mu4e~headers-quit-buffer ()
"Quit the mu4e-headers buffer. This is a rather complex function; to "Quit the mu4e-headers buffer. This is a rather complex function,
ensure we don't disturb other windows." to ensure we don't disturb other windows."
(interactive) (interactive)
(unless (eq major-mode 'mu4e-headers-mode) (unless (eq major-mode 'mu4e-headers-mode)
(error "Must be in mu4e-headers-mode (%S)" major-mode)) (error "Must be in mu4e-headers-mode (%S)" major-mode))

4
emacs/mu4e-view.el
View File

@ -1027,7 +1027,7 @@ the results."
(mu4e-process-file-through-pipe path cmd))) (mu4e-process-file-through-pipe path cmd)))
(defun mu4e~view-quit-buffer () (defun mu4e~view-quit-buffer ()
"Quit the mu4e-view buffer. This is a rather complex function; to "Quit the mu4e-view buffer. This is a rather complex function, to
ensure we don't disturb other windows." ensure we don't disturb other windows."
(interactive) (interactive)
(unless (eq major-mode 'mu4e-view-mode) (unless (eq major-mode 'mu4e-view-mode)
@ -1050,7 +1050,7 @@ ensure we don't disturb other windows."
;; now, all *other* windows should be gone. ;; now, all *other* windows should be gone.
;; if the headers view is also visible, kill ourselves + window; otherwise ;; if the headers view is also visible, kill ourselves + window; otherwise
;; switch to the headers view ;; switch to the headers view
(when (window-live-p headers-win) (if (window-live-p headers-win)
;; headers are visible ;; headers are visible
(progn (progn
(kill-buffer-and-window) ;; kill the view win (kill-buffer-and-window) ;; kill the view win