emacs: Fix notmuch-message-mark-replied.

notmuch-message-mark-replied used "apply" to change message tags
according to notmuch-message-replied-tags after sending a reply.  This
works if the latter is a single-element list.  But with the recently
changed format of tag changes, it breaks for multiple-element lists.
Use "funcall" to properly pass the list of tag changes as a single
argument.
This commit is contained in:
Ingo Lohmar 2012-06-03 21:23:57 +03:00 committed by David Bremner
parent 39beeb2a7e
commit bcdfff4f3a

View file

@ -45,7 +45,7 @@ the \"inbox\" and \"todo\", you would set
(concat "+" str) (concat "+" str)
str)) str))
notmuch-message-replied-tags))) notmuch-message-replied-tags)))
(apply 'notmuch-tag (notmuch-id-to-query (car (car rep))) tags))))) (funcall 'notmuch-tag (notmuch-id-to-query (car (car rep))) tags)))))
(add-hook 'message-send-hook 'notmuch-message-mark-replied) (add-hook 'message-send-hook 'notmuch-message-mark-replied)