[notmuch] [PATCH] notmuch.el: Use variable notmuch-search-oldest-first to decide the search order
Aneesh Kumar K.V
aneesh.kumar at linux.vnet.ibm.com
Mon Nov 23 06:50:59 PST 2009
Make sure we use notmuch-search-oldest-first to decide the how
the search result should be displayed. This helps to set the
value to nil and have latest mail shown first
Signed-off-by: Aneesh Kumar K.V <aneesh.kumar at linux.vnet.ibm.com>
---
notmuch.el | 7 ++++---
1 files changed, 4 insertions(+), 3 deletions(-)
diff --git a/notmuch.el b/notmuch.el
index af4ceec..5582132 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -840,7 +840,8 @@ thread from that buffer can be show when done with this one)."
(fset 'notmuch-search-mode-map notmuch-search-mode-map)
(defvar notmuch-search-query-string)
-(defvar notmuch-search-oldest-first)
+(defvar notmuch-search-oldest-first t
+ "Show the oldest mail first in the search-mode")
(defun notmuch-search-scroll-up ()
"Scroll up, moving point to last message in thread if at end."
@@ -1106,7 +1107,7 @@ current search results AND that are tagged with the given tag."
(defun notmuch ()
"Run notmuch to display all mail with tag of 'inbox'"
(interactive)
- (notmuch-search "tag:inbox" t))
+ (notmuch-search "tag:inbox" notmuch-search-oldest-first))
(setq mail-user-agent 'message-user-agent)
@@ -1176,7 +1177,7 @@ results for the search terms in that line.
(setq folder (notmuch-folder-find-name)))
(let ((search (assoc folder notmuch-folders)))
(if search
- (notmuch-search (cdr search) t))))
+ (notmuch-search (cdr search) notmuch-search-oldest-first))))
(defun notmuch-folder ()
"Show the notmuch folder view and update the displayed counts."
--
1.6.5.2.74.g610f9
More information about the notmuch
mailing list