emacs: Change the default notmuch-mua-reply-insert-header-p-function
authorNicolas Petton <nicolas@petton.fr>
Wed, 16 Mar 2016 08:19:55 +0000 (09:19 +0100)
committerDavid Bremner <david@tethera.net>
Sat, 19 Mar 2016 14:18:03 +0000 (11:18 -0300)
Set notmuch-show-reply-insert-header-p-never as the default value for
notmuch-mua-reply-insert-header-p-function.

emacs/notmuch-mua.el

index fcb3e951f9dc7af174297d917b069d2ff959db19..4cb714a4b757c5b4a2150589eb24f6dc207d773d 100644 (file)
@@ -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)