emacs/reply: restrict what mime types are inlined by default

Apply the previously factored-out function used by notmuch-show.
This commit is contained in:
David Bremner 2022-03-19 07:07:54 -03:00
parent 817e53f4db
commit 90a7c1af36
2 changed files with 3 additions and 2 deletions

View file

@ -316,7 +316,9 @@ Typically this is added to `notmuch-mua-send-hook'."
;; text. ;; text.
(notmuch-show-process-crypto process-crypto) (notmuch-show-process-crypto process-crypto)
;; Don't indent multipart sub-parts. ;; Don't indent multipart sub-parts.
(notmuch-show-indent-multipart nil)) (notmuch-show-indent-multipart nil)
;; Stop certain mime types from being inlined
(mm-inline-override-types (notmuch--inline-override-types)))
;; We don't want sigstatus buttons (an information leak and usually wrong anyway). ;; We don't want sigstatus buttons (an information leak and usually wrong anyway).
(cl-letf (((symbol-function 'notmuch-crypto-insert-sigstatus-button) #'ignore) (cl-letf (((symbol-function 'notmuch-crypto-insert-sigstatus-button) #'ignore)
((symbol-function 'notmuch-crypto-insert-encstatus-button) #'ignore)) ((symbol-function 'notmuch-crypto-insert-encstatus-button) #'ignore))

View file

@ -11,7 +11,6 @@ test_require_emacs
add_email_corpus attachment add_email_corpus attachment
test_begin_subtest "tar not inlined by default" test_begin_subtest "tar not inlined by default"
test_subtest_known_broken
test_emacs '(notmuch-mua-new-reply "id:874llc2bkp.fsf@curie.anarc.at") test_emacs '(notmuch-mua-new-reply "id:874llc2bkp.fsf@curie.anarc.at")
(test-visible-output "OUTPUT.raw")' (test-visible-output "OUTPUT.raw")'
cat <<EOF > EXPECTED cat <<EOF > EXPECTED