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

* fix errors when doing next/forward in split-view

Browse Source
This commit is contained in:
djcb
2012-05-21 15:28:55 +03:00
parent ab119df2d9
commit 5d5533c953
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
emacs/mu4e-headers.el
View File

@ -633,8 +633,8 @@ update the query history stack."
of `mu4e-split-view', and return a window for the message view." of `mu4e-split-view', and return a window for the message view."
(unless (buffer-live-p mu4e~headers-buffer) (unless (buffer-live-p mu4e~headers-buffer)
(error "No headers buffer available")) (error "No headers buffer available"))
(ignore-errors (delete-window mu4e~headers-view-win))
(switch-to-buffer mu4e~headers-buffer) (switch-to-buffer mu4e~headers-buffer)
(delete-other-windows)
(setq mu4e~headers-view-win (setq mu4e~headers-view-win
(cond (cond
((eq mu4e-split-view 'horizontal) ;; split horizontally ((eq mu4e-split-view 'horizontal) ;; split horizontally
@ -965,9 +965,9 @@ docid. Otherwise, return nil."
(set-window-point (get-buffer-window mu4e~headers-buffer) (point)) (set-window-point (get-buffer-window mu4e~headers-buffer) (point))
;; attempt to highlight the new line, display the message ;; attempt to highlight the new line, display the message
(mu4e~headers-highlight docid) (mu4e~headers-highlight docid)
;; update message view if it was already showing
(when (window-live-p mu4e~headers-view-win) (when (window-live-p mu4e~headers-view-win)
(select-window (mu4e~headers-redraw-get-view-window) (mu4e-headers-view-message))
(mu4e-headers-view-message)))
docid))) docid)))
(defun mu4e-headers-next (&optional n) (defun mu4e-headers-next (&optional n)