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

mu4e: always run mu4e-index-updated-hook after index

Browse Source 
Fire mu4e-index-updated-hook after any index operations, where anything changed
or not. Add a new variable `mu4e-index-update-status' which can be used to see
what changed (if anything) in the last indexing operation.

Keep mu4e-message-changed-hook in place; it only fires when a message
changed (and when it is update).

Remove the long-obsolete `mu4e-msg-changed-hook'.
This commit is contained in:
Dirk-Jan C. Binnema
2021-10-21 19:13:02 +03:00
parent 4adee3c1f0
commit f3e3cc9ca2
3 changed files with 38 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
mu4e/mu4e-headers.el
View File

@ -46,6 +46,7 @@
(require 'mu4e-actions)
(require 'mu4e-message)
(require 'mu4e-lists)
(require 'mu4e-update)
(require 'mu4e-folders)
(declare-function mu4e-view "mu4e-view")
@ -1085,9 +1086,11 @@ after the end of the search results."
(defun mu4e~headers-maybe-auto-update ()
"Update the current headers buffer after indexing has brought
some changes, `mu4e-headers-auto-update' is non-nil and there is
no user-interaction ongoing."
(when (and mu4e-headers-auto-update ;; must be set
some changes, `mu4e-headers-auto-update' is non-nil and there
isno user-interaction ongoing."
(when (and mu4e-headers-auto-update ;; must be set
mu4e-index-update-status
(> 0 (plist-get mu4e-index-update-status :updated))
(zerop (mu4e-mark-marks-num)) ;; non active marks
(not (active-minibuffer-window))) ;; no user input only
;; rerun search if there's a live window with search results;
@ -1106,10 +1109,7 @@ no user-interaction ongoing."
(set (make-local-variable 'hl-line-face) 'mu4e-header-highlight-face)
;; maybe update the current headers upon indexing changes
(add-hook 'mu4e-index-updated-hook 'mu4e~headers-maybe-auto-update)
(add-hook 'mu4e-index-updated-hook
#'mu4e~headers-index-updated-hook-fn
t)
(add-hook 'mu4e-index-updated-hook #'mu4e~headers-maybe-auto-update)
(setq
truncate-lines t
buffer-undo-list t ;; don't record undo information
@ -1122,9 +1122,6 @@ no user-interaction ongoing."
(mu4e-search-minor-mode)
(hl-line-mode 1))
(defun mu4e~headers-index-updated-hook-fn ()
(run-hooks 'mu4e-message-changed-hook))
;;; Highlighting
(defvar mu4e~highlighted-docid nil