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

emacs/show: Remove the 'no-buttons option of `notmuch-show-insert-bodypart'

Browse source 
No code uses the 'no-buttons argument to
`notmuch-show-insert-bodypart', so remove it.
This commit is contained in:
David Edmondson 2016-02-20 18:24:39 +00:00 committed by David Bremner
parent e103f0a971
commit adefa734e3
1 changed files with 3 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
emacs/notmuch-show.el
View file

@ -959,9 +959,7 @@ this part.")
HIDE determines whether to show or hide the part and the button
as follows: If HIDE is nil, show the part and the button. If HIDE
is t, hide the part initially and show the button. If HIDE is
'no-buttons, show the part but do not add any buttons (this is
useful for quoting in replies)."
is t, hide the part initially and show the button."
(let* ((content-type (downcase (plist-get part :content-type)))
(mime-type (notmuch-show-mime-type part))
@ -972,12 +970,10 @@ useful for quoting in replies)."
(beg (point))
;; This default header-p function omits the part button for
;; the first (or only) part if this is text/plain.
(button (when (and (not (equal hide 'no-buttons))
(funcall notmuch-show-insert-header-p-function part hide))
(button (when (funcall notmuch-show-insert-header-p-function part hide)
(notmuch-show-insert-part-header nth mime-type content-type (plist-get part :filename))))
;; Hide the part initially if HIDE is t, or if it is too long
;; and we have a button to allow toggling (thus reply which
;; uses 'no-buttons automatically includes long parts)
;; and we have a button to allow toggling.
(show-part (not (or (equal hide t)
(and long button))))
(content-beg (point)))