diff options
| -rw-r--r-- | lisp/email.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lisp/email.el b/lisp/email.el index b5b9a4e..73aa22b 100644 --- a/lisp/email.el +++ b/lisp/email.el @@ -85,5 +85,12 @@ (global-set-key (kbd "<f12>") 'mu4e) +;; Encryption (setq mml2015-encrypt-to-self t) (setq mml2015-sign-with-sender t) +(add-hook 'mu4e-compose-mode-hook + (defun my/maybe-reply-encrypted () + "Encrypt automatically if parent message was also encrypted." + (let ((msg mu4e-compose-parent-message)) + (when (and msg (member 'encrypted (mu4e-message-field msg :flags))) + (mml-secure-message-sign-encrypt))))) |