I checked in the Emacs 22.1 source code, and there it was a defaulted to message-cite-original as well. This patch falls back to message-cite-original in the unlikely case that someone has customized message-cite-function to nil.
- Todd --- emacs/notmuch-mua.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/emacs/notmuch-mua.el b/emacs/notmuch-mua.el index 2c58886..2a01455 100644 --- a/emacs/notmuch-mua.el +++ b/emacs/notmuch-mua.el @@ -220,8 +220,8 @@ list." (date (plist-get original-headers :Date)) (start (point))) - ;; message-cite-original constructs a citation line based on the From and Date - ;; headers of the original message, which are assumed to be in the buffer. + ;; message-cite-function should construct a citation line based on the From and + ;; Date headers of the original message, which are assumed to be in the buffer. (insert "From: " from "\n") (insert "Date: " date "\n\n") @@ -233,7 +233,7 @@ list." (set-mark (point)) (goto-char start) ;; Quote the original message according to the user's configured style. - (message-cite-original))) + (funcall (or message-cite-function #'message-cite-original)))) ;; Crypto processing based crypto content of the original message (when process-crypto -- 1.9.1