summaryrefslogtreecommitdiffstats
path: root/init.org
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--init.org40
1 files changed, 20 insertions, 20 deletions
diff --git a/init.org b/init.org
index b7679a7..96899a5 100644
--- a/init.org
+++ b/init.org
@@ -1452,42 +1452,39 @@ Also see [[https://www.emacswiki.org/emacs/rebox2][rebox2]].
#+end_src
* Email
-** [[https://notmuchmail.org][notmuch]]
-
-See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
#+begin_src emacs-lisp
-(defvar amin-maildir "~/mail")
+(defvar amin-maildir (expand-file-name "~/mail/"))
+(after! recentf
+ (add-to-list 'recentf-exclude amin-maildir))
+#+end_src
+** sendmail
+
+#+begin_src emacs-lisp
(use-package sendmail
- ;; :ensure nil
:config
(setq sendmail-program "/usr/bin/msmtp"
- ; message-sendmail-extra-arguments '("-v" "-d")
+ ;; message-sendmail-extra-arguments '("-v" "-d")
mail-specify-envelope-from t
mail-envelope-from 'header))
+#+end_src
+
+** message
+#+begin_src emacs-lisp
(use-package message
- ;; :ensure nil
:config
(setq message-kill-buffer-on-exit t
message-send-mail-function 'message-send-mail-with-sendmail
message-sendmail-envelope-from 'header
- message-directory "drafts"
+ ;; message-directory "drafts"
message-user-fqdn "aminb.org")
(add-hook 'message-mode-hook
(lambda () (setq fill-column 65
message-fill-column 65)))
(add-hook 'message-mode-hook
#'flyspell-mode)
- ;; (add-hook 'notmuch-message-mode-hook #'+doom-modeline|set-special-modeline)
- ;; TODO: is there a way to only run this when replying and not composing?
- ;; (add-hook 'notmuch-message-mode-hook
- ;; (lambda () (progn
- ;; (newline)
- ;; (newline)
- ;; (forward-line -1)
- ;; (forward-line -1))))
;; (add-hook 'message-setup-hook
;; #'mml-secure-message-sign-pgpmime)
)
@@ -1495,7 +1492,13 @@ See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
(after! mml-sec
(setq mml-secure-openpgp-encrypt-to-self t
mml-secure-openpgp-sign-with-sender t))
+#+end_src
+** [[https://notmuchmail.org][notmuch]]
+
+See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
+
+#+begin_src emacs-lisp
(defun amin/notmuch ()
"Delete other windows, then launch `notmuch'."
(interactive)
@@ -1504,7 +1507,7 @@ See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
(use-package notmuch
:commands notmuch
- :bind ("C-c m" . amin/notmuch)
+ :bind ("C-c n" . amin/notmuch)
:custom (notmuch-always-prompt-for-sender t)
:config
(setq notmuch-hello-sections
@@ -1614,9 +1617,6 @@ See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
(after! notmuch-crypto
(setq notmuch-crypto-process-mime t))
-
-(after! recentf
- (add-to-list 'recentf-exclude (expand-file-name amin-maildir)))
#+end_src
** supercite