diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/email.el | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/lisp/email.el b/lisp/email.el index 1ca3536..16ed547 100644 --- a/lisp/email.el +++ b/lisp/email.el @@ -153,6 +153,8 @@ (when msg (or (mu4e-message-contact-field-matches msg :to (rot13 "erxnqb@ryrcuyl.arg")) + (mu4e-message-contact-field-matches + msg :from (rot13 "erxnqb@ryrcuyl.arg")) ;; Additional check if this is a mailing list email. (and (mu4e-message-field msg :mailing-list) (zerop (call-process "grep" nil nil nil @@ -178,7 +180,11 @@ http://elephly.net"))) (or (mu4e-message-contact-field-matches msg :to (rot13 "erxnqb@sunva.pbqreqbwb.oreyva")) (mu4e-message-contact-field-matches - msg :to (rot13 "uryyb@sunva.pbqreqbwb.oreyva"))))) + msg :from (rot13 "erxnqb@sunva.pbqreqbwb.oreyva")) + (mu4e-message-contact-field-matches + msg :to (rot13 "uryyb@sunva.pbqreqbwb.oreyva")) + (mu4e-message-contact-field-matches + msg :from (rot13 "uryyb@sunva.pbqreqbwb.oreyva"))))) :vars `((user-mail-address . ,(rot13 "erxnqb@sunva.pbqreqbwb.oreyva")) (user-full-name . ,(rot13 "Evpneqb Jhezhf")) (mu4e-sent-folder . "/fhaindojo/Sent") @@ -198,6 +204,8 @@ http://elephly.net"))) (when msg (or (mu4e-message-contact-field-matches msg :to (rot13 "evpneqb.jhezhf@zqp-oreyva.qr")) + (mu4e-message-contact-field-matches + msg :from (rot13 "evpneqb.jhezhf@zqp-oreyva.qr")) ;; Additional check if this is a mailing list email. (and (mu4e-message-field msg :mailing-list) (zerop (call-process "grep" nil nil nil |