X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch-mua.el;h=04459750073c582370d87fa3b743d22dad972e5f;hb=1819d03c2744246ad4158c616969d4a911a988d6;hp=935cbd3b6298607e576fd946eec021c03f715e28;hpb=fd6f65f241854cd55e7e4d7c9cb9a71bd9f70cb4;p=notmuch diff --git a/emacs/notmuch-mua.el b/emacs/notmuch-mua.el index 935cbd3b..04459750 100644 --- a/emacs/notmuch-mua.el +++ b/emacs/notmuch-mua.el @@ -1,4 +1,4 @@ -;; notmuch-mua.el --- emacs style mail-user-agent +;;; notmuch-mua.el --- emacs style mail-user-agent ;; ;; Copyright © David Edmondson ;; @@ -19,6 +19,8 @@ ;; ;; Authors: David Edmondson +;;; Code: + (require 'message) (require 'mm-view) (require 'format-spec) @@ -248,7 +250,9 @@ mutiple parts get a header." ;; Don't omit long parts. (notmuch-show-max-text-part-size 0) ;; Insert headers for parts as appropriate for replying. - (notmuch-show-insert-header-p-function notmuch-mua-reply-insert-header-p-function)) + (notmuch-show-insert-header-p-function notmuch-mua-reply-insert-header-p-function) + ;; Don't indent multipart sub-parts. + (notmuch-show-indent-multipart nil)) (notmuch-show-insert-body original (plist-get original :body) 0) (buffer-substring-no-properties (point-min) (point-max))))) @@ -513,3 +517,5 @@ simply runs the corresponding `message-mode' hook functions." ;; (provide 'notmuch-mua) + +;;; notmuch-mua.el ends here