[PATCH v6 7/8] emacs: Add `notmuch-show-only-matching-messages'.
David Edmondson
dme at dme.org
Thu Feb 2 03:23:52 PST 2012
Allow the user to choose that only matching messages are shown by
default.
---
emacs/notmuch-show.el | 8 ++++++++
1 files changed, 8 insertions(+), 0 deletions(-)
diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el
index 895feb5..ae7af02 100644
--- a/emacs/notmuch-show.el
+++ b/emacs/notmuch-show.el
@@ -125,6 +125,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)
@@ -1018,6 +1023,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
--
1.7.8.3
More information about the notmuch
mailing list