debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-12-22 17:34:54 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: Allow headers to be shown by default in show mode

Browse source 
Add `notmuch-show-headers-visible' which, when set `t', causes headers
to be shown by default.
This commit is contained in:
David Edmondson 2010-04-23 12:54:21 +01:00 committed by Carl Worth
parent 6ddc2e0442
commit 63b8a2b9af
1 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
emacs/notmuch-show.el
View file

@ -42,6 +42,11 @@
that if this order is changed the headers shown when a message is
collapsed will change.")
(defcustom notmuch-show-headers-visible nil
"Should the headers be visible by default?"
:group 'notmuch
:type 'boolean)
(defvar notmuch-show-markup-headers-hook '(notmuch-show-colour-headers)
"A list of functions called to decorate the headers listed in
`notmuch-show-headers'.")
@ -416,8 +421,8 @@ current buffer, if possible."
;; the content).
(notmuch-show-set-message-properties msg)
;; Headers are hidden by default.
(notmuch-show-headers-visible msg nil)
;; Set header visibility.
(notmuch-show-headers-visible msg notmuch-show-headers-visible)
;; Message visibility depends on whether it matched the search
;; criteria.