emacs: Change the default notmuch-mua-reply-insert-header-p-function

Set notmuch-show-reply-insert-header-p-never as the default value for
notmuch-mua-reply-insert-header-p-function.
This commit is contained in:
Nicolas Petton 2016-03-16 09:19:55 +01:00 committed by David Bremner
parent 557965b8fa
commit e253c94888

View file

@ -94,19 +94,19 @@ Note that these functions use `mail-citation-hook' if that is non-nil."
:group 'notmuch-reply) :group 'notmuch-reply)
(defcustom notmuch-mua-reply-insert-header-p-function (defcustom notmuch-mua-reply-insert-header-p-function
'notmuch-show-reply-insert-header-p-trimmed 'notmuch-show-reply-insert-header-p-never
"Function to decide which parts get a header when replying. "Function to decide which parts get a header when replying.
This function specifies which parts of a mime message with This function specifies which parts of a mime message with
mutiple parts get a header." mutiple parts get a header."
:type '(radio (const :tag "All except multipart/* and hidden parts" :type '(radio (const :tag "No part headers"
notmuch-show-reply-insert-header-p-trimmed) notmuch-show-reply-insert-header-p-never)
(const :tag "All except multipart/* and hidden parts"
notmuch-show-reply-insert-header-p-trimmed)
(const :tag "Only for included text parts" (const :tag "Only for included text parts"
notmuch-show-reply-insert-header-p-minimal) notmuch-show-reply-insert-header-p-minimal)
(const :tag "Exactly as in show view" (const :tag "Exactly as in show view"
notmuch-show-insert-header-p) notmuch-show-insert-header-p)
(const :tag "No part headers"
notmuch-show-reply-insert-header-p-never)
(function :tag "Other")) (function :tag "Other"))
:group 'notmuch-reply) :group 'notmuch-reply)