aboutsummaryrefslogtreecommitdiffstats
path: root/_spacemacs.d/local/mu4e/mu4e-proc.el
diff options
context:
space:
mode:
Diffstat (limited to '_spacemacs.d/local/mu4e/mu4e-proc.el')
-rw-r--r--_spacemacs.d/local/mu4e/mu4e-proc.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/_spacemacs.d/local/mu4e/mu4e-proc.el b/_spacemacs.d/local/mu4e/mu4e-proc.el
index d93af5d..d6d90e1 100644
--- a/_spacemacs.d/local/mu4e/mu4e-proc.el
+++ b/_spacemacs.d/local/mu4e/mu4e-proc.el
@@ -401,14 +401,15 @@ or (:error ) sexp, which are handled my `mu4e-update-func' and
idparam (or flagstr "") (or path "")
(format "newname:%s" rename))))
-(defun mu4e~proc-index (path my-addresses)
+(defun mu4e~proc-index (path my-addresses cleanup lazy-check)
"Update the message database for filesystem PATH, which should
point to some maildir directory structure. MY-ADDRESSES is a list
of 'my' email addresses (see `mu4e-user-mail-address-list')."
(let ((path (mu4e~proc-escape path))
(addrs (when my-addresses (mapconcat 'identity my-addresses ","))))
(if addrs
- (mu4e~proc-send-command "cmd:index path:%s my-addresses:%s" path addrs)
+ (mu4e~proc-send-command "cmd:index path:%s my-addresses:%s cleanup:%s lazy-check:%s"
+ path addrs (if cleanup "true" : "false") (if lazy-check "true"))
(mu4e~proc-send-command "cmd:index path:%s" path))))
(defun mu4e~proc-add (path maildir)