sqrtminusone/dotfiles
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/dotfiles.git synced 2025-12-11 19:45:25 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

feat(mail): warn if no subject

Browse source
This commit is contained in:
Pavel Korytov 2023-07-18 17:32:52 +03:00
parent aabea47b45
commit 636a7eae1c
2 changed files with 15 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
.emacs.d/mail.el
View file

@ -119,3 +119,10 @@
(with-eval-after-load 'notmuch-mua (with-eval-after-load 'notmuch-mua
(advice-add #'notmuch-mua-reply :after #'my/message-maybe-fix-signature)) (advice-add #'notmuch-mua-reply :after #'my/message-maybe-fix-signature))
(defun my/message-ensure-subject ()
(unless (or (message-field-value "Subject")
(y-or-n-p "No subject. Send? "))
(user-error "Aborting.")))
(add-hook 'notmuch-mua-send-hook #'my/message-ensure-subject)

8
Mail.org
View file

@ -589,7 +589,15 @@ Then advice the =notmuch-mua-reply= function:
(with-eval-after-load 'notmuch-mua (with-eval-after-load 'notmuch-mua
(advice-add #'notmuch-mua-reply :after #'my/message-maybe-fix-signature)) (advice-add #'notmuch-mua-reply :after #'my/message-maybe-fix-signature))
#+end_src #+end_src
** Warn if no subject
#+begin_src emacs-lisp
(defun my/message-ensure-subject ()
(unless (or (message-field-value "Subject")
(y-or-n-p "No subject. Send? "))
(user-error "Aborting.")))
(add-hook 'notmuch-mua-send-hook #'my/message-ensure-subject)
#+end_src
* mailcap * mailcap
mailcap file is a file which defines how to read to different MIME types. Notmuch also uses it, so why not keep it here. mailcap file is a file which defines how to read to different MIME types. Notmuch also uses it, so why not keep it here.