Parent message is tagged "replied" prematurely.

Only do so when reply is *really* sent.

(describe-variable 'message-send-hook)
> Hook run before sending messages.
> This hook is run quite early when sending.

(describe-variable 'message-sent-hook)
> Hook run after sending messages.

Signed-off-by: Pieter Praet <pieter at praet.org>
---
 emacs/notmuch-message.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/emacs/notmuch-message.el b/emacs/notmuch-message.el
index d5c96c2..c8b19c3 100644
--- a/emacs/notmuch-message.el
+++ b/emacs/notmuch-message.el
@@ -47,6 +47,6 @@ the \"inbox\" and \"todo\", you would set
        (apply 'notmuch-call-notmuch-process "tag"
               (append tags (list (concat "id:" (car (car rep)))) nil))))))

-(add-hook 'message-send-hook 'notmuch-message-mark-replied)
+(add-hook 'message-sent-hook 'notmuch-message-mark-replied)

 (provide 'notmuch-message)
-- 
1.7.4.1

Reply via email to