From 866ce8b132c4b1e912f21a8b054f839f53281dde Mon Sep 17 00:00:00 2001 From: David Edmondson Date: Wed, 8 Feb 2012 08:02:18 +0000 Subject: [PATCH] emacs: Add `notmuch-show-only-matching-messages'. Allow the user to choose that only matching messages are shown by default. --- emacs/notmuch-show.el | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el index 0b023a5c..7ffa1ed1 100644 --- a/emacs/notmuch-show.el +++ b/emacs/notmuch-show.el @@ -126,6 +126,11 @@ indentation." (const :tag "View interactively" 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) (make-variable-buffer-local 'notmuch-show-thread-id) (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 ;; buffer. (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 notmuch-show-parent-buffer parent-buffer -- 2.26.2