summaryrefslogtreecommitdiffhomepage
path: root/email.org
diff options
context:
space:
mode:
Diffstat (limited to 'email.org')
-rw-r--r--email.org10
1 files changed, 5 insertions, 5 deletions
diff --git a/email.org b/email.org
index ba0ba05..cc28b73 100644
--- a/email.org
+++ b/email.org
@@ -1,12 +1,12 @@
#+property: header-args:emacs-lisp :lexical t :tangle yes :comments yes :results silent :shebang ";; -*- lexical-binding: t; -*-" :tangle-mode (identity #o644)
#+title: email handling (message mode, bbdb, gnus, notmuch)
-* personal emails
+* personal emails and others
#+begin_src emacs-lisp
(defvar jao-mails)
(defvar jao-extra-mails)
- (defvar jao-mails-regexp)
- (setq jao-mails-regexp (regexp-opt jao-mails))
+ (defvar jao-mails-regexp (regexp-opt jao-mails))
+ (defvar jao-notmuch-enabled (eq jao-afio-mail-function 'notmuch))
#+end_src
* gnus
*** directories
@@ -208,10 +208,11 @@
*** Send mail hooks
#+begin_src emacs-lisp
(dolist (h '(jao-message-check-gcc
- jao-message-check-attachment
jao-message-check-recipient
jao-message-maybe-sign))
(add-hook 'message-send-hook h))
+ (unless jao-notmuch-enabled
+ (add-hook 'message-send-hook #'jao-message-check-attachment))
#+end_src
*** Keybindings
#+begin_src emacs-lisp
@@ -381,6 +382,5 @@
#+end_src
* notmuch
#+begin_src emacs-lisp
- (defvar jao-notmuch-enabled-p (eq jao-afio-mail-function 'notmuch))
(jao-load-org "notmuch")
#+end_src