Avoid inserting part headers when rendering a message body for citation purposes. --- emacs/notmuch-mua.el | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-)
diff --git a/emacs/notmuch-mua.el b/emacs/notmuch-mua.el index 09c922f..c800c38 100644 --- a/emacs/notmuch-mua.el +++ b/emacs/notmuch-mua.el @@ -201,10 +201,13 @@ list." (insert "Date: " date "\n\n") (insert (with-temp-buffer - ;; Don't attempt to clean up messages, excerpt - ;; citations, etc. in the original message before - ;; quoting. - (let ((notmuch-show-insert-text/plain-hook nil)) + (let + ;; Don't attempt to clean up messages, excerpt + ;; citations, etc. in the original message before + ;; quoting. + ((notmuch-show-insert-text/plain-hook nil) + ;; Don't insert part buttons. + (notmuch-show-insert-header-p-function #'notmuch-show-insert-header-p-never)) (notmuch-show-insert-body original (plist-get original :body) 0) (buffer-substring-no-properties (point-min) (point-max))))) -- 2.0.0.rc0