mu4e: tweak mu4e--query-items-queries-handler

This commit is contained in:
Dirk-Jan C. Binnema
2023-01-18 00:56:13 +02:00
parent 6271d0119b
commit e97dcb1ff7

View File

@ -105,7 +105,7 @@ If ITEMS does not yet have a favorite item, pick the first."
(defun mu4e--query-items-reset-baseline () (defun mu4e--query-items-reset-baseline ()
"Reset the baseline query-items." "Reset the baseline query-items."
(setq mu4e--query-items-baseline (mu4e-server-query-items) (setq mu4e--query-items-baseline nil
mu4e--query-items-baseline-tstamp (current-time)) mu4e--query-items-baseline-tstamp (current-time))
(mu4e--query-items-reset)) (mu4e--query-items-reset))
@ -149,12 +149,10 @@ With RESET-BASELINE, reset the baseline first."
I.e. what we get in response to mu4e--query-items-refresh." I.e. what we get in response to mu4e--query-items-refresh."
;; if we don't have a baseline yet, set it. (note that ;; if we don't have a baseline yet, set it. (note that
;; mu4e--query-items-reset-baseline also calls mu4e--query-items-reset. ;; mu4e--query-items-reset-baseline also calls mu4e--query-items-reset.
(if (not mu4e--query-items-baseline) (mu4e--query-items-reset)
(progn (mu4e-query-items) ;; for side-effects; recalculate.
(mu4e--query-items-reset-baseline)) (when (not mu4e--query-items-baseline)
(mu4e--query-items-reset)) (mu4e--query-items-reset-baseline)))
;; for side-effects; recalculate.
(mu4e-query-items))
;; this makes for O(n*m)... but with typically small(ish) n,m. Perhaps use a ;; this makes for O(n*m)... but with typically small(ish) n,m. Perhaps use a
;; hash for last-query-items and baseline-results? ;; hash for last-query-items and baseline-results?