mu4e: updates for core changes
Deal with (name . email) --> (:name "boo" :email "boo@example.com") Add support for the new "changed" field.
This commit is contained in:
@ -96,7 +96,7 @@
|
||||
(defun mu4e~icalendar-has-email (email list)
|
||||
"Check that EMAIL is in LIST."
|
||||
(let ((email (downcase email)))
|
||||
(cl-find-if (lambda (c) (let ((e (cdr c)))
|
||||
(cl-find-if (lambda (c) (let ((e (mu4e-contact-email c)))
|
||||
(and (stringp e) (string= email (downcase e)))))
|
||||
list)))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user