mirror of
https://git.notmuchmail.org/git/notmuch
synced 2024-11-21 18:38:08 +01:00
emacs: show: stop display of application/* parts
Gnus seems to display application/zip and application/tar by default. This doesn't seem desirable so we override it. We only override if the user has not customized mm-inline-override-types themselves.
This commit is contained in:
parent
75bb23f748
commit
df483ed4bd
1 changed files with 9 additions and 1 deletions
|
@ -1227,7 +1227,15 @@ matched."
|
|||
(interactive "sNotmuch show: \nP")
|
||||
(let ((buffer-name (generate-new-buffer-name
|
||||
(or buffer-name
|
||||
(concat "*notmuch-" thread-id "*")))))
|
||||
(concat "*notmuch-" thread-id "*"))))
|
||||
;; We override mm-inline-override-types to stop application/*
|
||||
;; parts from being displayed unless the user has customized
|
||||
;; it themselves.
|
||||
(mm-inline-override-types
|
||||
(if (equal mm-inline-override-types
|
||||
(eval (car (get 'mm-inline-override-types 'standard-value))))
|
||||
(cons "application/*" mm-inline-override-types)
|
||||
mm-inline-override-types)))
|
||||
(switch-to-buffer (get-buffer-create buffer-name))
|
||||
;; No need to track undo information for this buffer.
|
||||
(setq buffer-undo-list t)
|
||||
|
|
Loading…
Reference in a new issue