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

emacs: Add `notmuch-show-only-matching-messages'.

Browse source 
Allow the user to choose that only matching messages are shown by
default.
This commit is contained in:
David Edmondson 2012-02-08 08:02:18 +00:00 committed by David Bremner
parent d268422884
commit 866ce8b132
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
emacs/notmuch-show.el
View file

@ -126,6 +126,11 @@ indentation."
(const :tag "View interactively" (const :tag "View interactively"
notmuch-show-interactively-view-part))) notmuch-show-interactively-view-part)))
(defcustom notmuch-show-only-matching-messages nil
"Only matching messages are shown by default."
:type 'boolean
:group 'notmuch-show)
(defvar notmuch-show-thread-id nil) (defvar notmuch-show-thread-id nil)
(make-variable-buffer-local 'notmuch-show-thread-id) (make-variable-buffer-local 'notmuch-show-thread-id)
(put 'notmuch-show-thread-id 'permanent-local t) (put 'notmuch-show-thread-id 'permanent-local t)
@ -1032,6 +1037,9 @@ function is used."
;; Set the default value for `notmuch-show-process-crypto' in this ;; Set the default value for `notmuch-show-process-crypto' in this
;; buffer. ;; buffer.
(setq notmuch-show-process-crypto notmuch-crypto-process-mime) (setq notmuch-show-process-crypto notmuch-crypto-process-mime)
;; Set the default value for
;; `notmuch-show-elide-non-matching-messages' in this buffer.
(setq notmuch-show-elide-non-matching-messages notmuch-show-only-matching-messages)
(setq notmuch-show-thread-id thread-id (setq notmuch-show-thread-id thread-id
notmuch-show-parent-buffer parent-buffer notmuch-show-parent-buffer parent-buffer