X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch-mua.el;h=4cb714a4b757c5b4a2150589eb24f6dc207d773d;hb=e253c94888046926794f58124cbd2a219501ab1b;hp=fcb3e951f9dc7af174297d917b069d2ff959db19;hpb=557965b8fae3d7923cee0fb8d9b298173e73a264;p=notmuch

diff --git a/emacs/notmuch-mua.el b/emacs/notmuch-mua.el
index fcb3e951..4cb714a4 100644
--- a/emacs/notmuch-mua.el
+++ b/emacs/notmuch-mua.el
@@ -94,19 +94,19 @@ Note that these functions use `mail-citation-hook' if that is non-nil."
   :group 'notmuch-reply)
 
 (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.
 
 This function specifies which parts of a mime message with
 mutiple parts get a header."
-  :type '(radio (const :tag "All except multipart/* and hidden parts"
-			       notmuch-show-reply-insert-header-p-trimmed)
+  :type '(radio (const :tag "No part headers"
+		               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"
 			       notmuch-show-reply-insert-header-p-minimal)
 		(const :tag "Exactly as in show view"
 			       notmuch-show-insert-header-p)
-		(const :tag "No part headers"
-			       notmuch-show-reply-insert-header-p-never)
 		(function :tag "Other"))
   :group 'notmuch-reply)