From 2df214b91c87f120e42b1d1eb253bfdadc4230b3 Mon Sep 17 00:00:00 2001 From: jao Date: Tue, 11 Jan 2022 01:18:19 +0000 Subject: message: bcc setup --- email.org | 17 ++++++++++++++--- 1 file changed, 14 insertions(+), 3 deletions(-) (limited to 'email.org') diff --git a/email.org b/email.org index e67a855..ce4fc8a 100644 --- a/email.org +++ b/email.org @@ -69,13 +69,25 @@ (concat "X-Attribution: jao\n" "X-Clacks-Overhead: GNU Terry Pratchett\n" - "X-URL: \n") + "X-URL: \n") message-hidden-headers '("^References:" "^Face:" "^X-Face:" "^X-Draft-From:") message-make-forward-subject-function 'message-forward-subject-fwd) (setq message-expand-name-standard-ui t) #+end_src +*** Bcc + #+begin_src emacs-lisp + (defvar jao-message--bcc-rx (regexp-opt '("mail.io" "gnu.org"))) + + (defun jao-message-insert-bcc () + (let ((f (or (message-fetch-field "From") ""))) + (when (or (string-blank-p f) (string-match-p jao-message--bcc-rx f)) + (insert "Bcc: trove@jao.io\n")))) + + (add-hook 'message-header-setup-hook #'jao-message-insert-bcc) + + #+end_src *** Encryption #+begin_src emacs-lisp ;; avoiding bogus warning @@ -128,7 +140,7 @@ '("User-Agent" . address-mime))) #+end_src *** Attach image to message - Use ~C-c C-p~ in message-mode. + Use ~C-c C-p~ in message-mode, and ~C-c y~. *** Check attachment #+begin_src emacs-lisp (defvar jao-message-attachment-regexp "\\([Ww]e send\\|[Ii] send\\|attach\\)") @@ -358,6 +370,5 @@ * notmuch #+begin_src emacs-lisp (defvar jao-notmuch-enabled-p (eq jao-afio-mail-function 'notmuch)) - (setq notmuch-address-command (if jao-notmuch-enabled-p 'internal 'as-is)) (jao-load-org "notmuch") #+end_src -- cgit v1.2.3