X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=blobdiff_plain;f=emacs%2Fnotmuch-message.el;h=aefd3fbc7a5c3d7f53a9be1942f5c2bc142d8df9;hp=d5c96c2b43ec967f5e5c768cb7babbd95ef7765d;hb=d84e92709195d13a117d8f98847ff17f8ff2276c;hpb=f35db275c44a0bc7a820b0dee20938c3782467d3

diff --git a/emacs/notmuch-message.el b/emacs/notmuch-message.el
index d5c96c2b..aefd3fbc 100644
--- a/emacs/notmuch-message.el
+++ b/emacs/notmuch-message.el
@@ -44,8 +44,7 @@ the \"inbox\" and \"todo\", you would set
 				 (concat "+" str)
 			       str))
 			  notmuch-message-replied-tags)))
-	(apply 'notmuch-call-notmuch-process "tag"
-	       (append tags (list (concat "id:" (car (car rep)))) nil))))))
+	(apply 'notmuch-tag (concat "id:" (car (car rep))) tags)))))
 
 (add-hook 'message-send-hook 'notmuch-message-mark-replied)