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

mu4e: headers: don't clear too soon

Browse Source 
Try burying header buffers a bit less aggressively.
This commit is contained in:
djcb
2017-01-18 00:13:02 +02:00
parent 6446d62c15
commit 4859cb802f
1 changed files with 3 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
mu4e/mu4e-headers.el
View File

@ -380,7 +380,6 @@ If SKIP-HOOK is not nil, `mu4e-message-changed-hook' will be invoked."
(when (buffer-live-p mu4e~headers-buffer) (when (buffer-live-p mu4e~headers-buffer)
(with-current-buffer mu4e~headers-buffer (with-current-buffer mu4e~headers-buffer
(mu4e~headers-remove-header docid t) (mu4e~headers-remove-header docid t)
;; if we were viewing this message, close it now. ;; if we were viewing this message, close it now.
(when (and (mu4e~headers-view-this-message-p docid) (when (and (mu4e~headers-view-this-message-p docid)
(buffer-live-p mu4e~view-buffer)) (buffer-live-p mu4e~view-buffer))
@ -901,7 +900,7 @@ no user-interaction ongoing."
(not (active-minibuffer-window))) ;; no user input only (not (active-minibuffer-window))) ;; no user input only
;; rerun search if there's a live window with search results; ;; rerun search if there's a live window with search results;
;; otherwise we'd trigger a headers view from out of nowhere. ;; otherwise we'd trigger a headers view from out of nowhere.
(when (and (buffer-live-p mu4e~hâeaders-buffer) (when (and (buffer-live-p mu4e~headers-buffer)
(window-live-p (get-buffer-window mu4e~headers-buffer))) (window-live-p (get-buffer-window mu4e~headers-buffer)))
(mu4e-headers-rerun-search)))) (mu4e-headers-rerun-search))))
@ -1079,7 +1078,7 @@ buffer for the results. If IGNORE-HISTORY is true, do *not* update
the query history stack." the query history stack."
;; note: we don't want to update the history if this query comes from ;; note: we don't want to update the history if this query comes from
;; `mu4e~headers-query-next' or `mu4e~headers-query-prev'. ;; `mu4e~headers-query-next' or `mu4e~headers-query-prev'.
(mu4e-hide-other-mu4e-buffers) ;;(mu4e-hide-other-mu4e-buffers)
(let* ((buf (get-buffer-create mu4e~headers-buffer-name)) (let* ((buf (get-buffer-create mu4e~headers-buffer-name))
(inhibit-read-only t) (inhibit-read-only t)
(maxnum (unless mu4e-headers-full-search mu4e-headers-results-limit))) (maxnum (unless mu4e-headers-full-search mu4e-headers-results-limit)))