* mu4e: mu4e-proc: capture sexp evaluation in (ignore-errors ...)
This commit is contained in:
@ -106,6 +106,7 @@ mu-servers in the following form:
|
|||||||
Function returns this sexp, or nil if there was
|
Function returns this sexp, or nil if there was
|
||||||
none. `mu4e~proc-buf' is updated as well, with all processed sexp
|
none. `mu4e~proc-buf' is updated as well, with all processed sexp
|
||||||
data removed."
|
data removed."
|
||||||
|
(ignore-errors ;; the server may die in the middle...
|
||||||
;; mu4e~cookie-matcher-rx:
|
;; mu4e~cookie-matcher-rx:
|
||||||
;; (concat mu4e~cookie-pre "\\([[:xdigit:]]+\\)]" mu4e~cookie-post)
|
;; (concat mu4e~cookie-pre "\\([[:xdigit:]]+\\)]" mu4e~cookie-post)
|
||||||
(let ((b (string-match mu4e~cookie-matcher-rx mu4e~proc-buf))
|
(let ((b (string-match mu4e~cookie-matcher-rx mu4e~proc-buf))
|
||||||
@ -125,7 +126,7 @@ data removed."
|
|||||||
'utf-8 t)))
|
'utf-8 t)))
|
||||||
(when objcons
|
(when objcons
|
||||||
(setq mu4e~proc-buf (substring mu4e~proc-buf sexp-len))
|
(setq mu4e~proc-buf (substring mu4e~proc-buf sexp-len))
|
||||||
(car objcons))))))
|
(car objcons)))))))
|
||||||
|
|
||||||
|
|
||||||
(defsubst mu4e~proc-filter (proc str)
|
(defsubst mu4e~proc-filter (proc str)
|
||||||
|
|||||||
Reference in New Issue
Block a user