debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-21 18:38:08 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: show: stop display of application/* parts

Browse source 
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:
Mark Walters 2017-01-28 09:47:42 +00:00 committed by David Bremner
parent 75bb23f748
commit df483ed4bd
1 changed files with 9 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
emacs/notmuch-show.el
View file

@ -1227,7 +1227,15 @@ matched."
(interactive "sNotmuch show: \nP") (interactive "sNotmuch show: \nP")
(let ((buffer-name (generate-new-buffer-name (let ((buffer-name (generate-new-buffer-name
(or 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)) (switch-to-buffer (get-buffer-create buffer-name))
;; No need to track undo information for this buffer. ;; No need to track undo information for this buffer.
(setq buffer-undo-list t) (setq buffer-undo-list t)