debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-21 18:38:08 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: Call `notmuch-mua-send-hook' hooks when sending a message

Browse source 
Previously any hook functions attached to `notmuch-mua-send-hook' were
ignored.
This commit is contained in:
David Edmondson 2018-09-25 16:09:10 +01:00 committed by David Bremner
parent 4e213fe9b4
commit e8cb6b2cd6
2 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
emacs/notmuch-mua.el
View file

@ -543,6 +543,7 @@ unencrypted. Really send? "))))
(defun notmuch-mua-send-common (arg &optional exit)
(interactive "P")
(run-hooks 'notmuch-mua-send-hook)
(when (and (notmuch-mua-check-no-misplaced-secure-tag)
(notmuch-mua-check-secure-tag-has-newline))
(letf (((symbol-function 'message-do-fcc) #'notmuch-maildir-message-do-fcc))

1
test/T310-emacs.sh
View file

@ -1107,7 +1107,6 @@ output=$(test_emacs "(mapcar 'notmuch-escape-boolean-term (list
test_expect_equal "$output" '("\"\"" "abc`~!@#$%^&*-=_+123" "\"(abc\"" "\")abc\"" "\"\"\"abc\"" "\"'$'\x01''xyz\"" "\"“xyz”\"")'
test_begin_subtest "Sending a message calls the send message hooks"
test_subtest_known_broken
emacs_deliver_message \
'Testing message sending hooks' \
'This is a test of the message sending hooks.' \