summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--custom/jao-custom-notmuch.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/custom/jao-custom-notmuch.el b/custom/jao-custom-notmuch.el
index 92b9be0..ade064b 100644
--- a/custom/jao-custom-notmuch.el
+++ b/custom/jao-custom-notmuch.el
@@ -1,4 +1,4 @@
-;; -*- lexical-binding: t; -*-
+;;; -*- lexical-binding: t; -*-
;;; minibuffer
(defvar jao-notmuch-minibuffer-string "")
@@ -207,8 +207,10 @@ ch--search-keys i)
"Jump to a saved, non-zero count search."
(interactive)
(if-let* ((searches (jao-notmuch--searches-w/new notmuch-saved-searches)))
- (if (= 1 (length searches))
- (let* ((q (car searches))
+ (if (= 2 (length searches))
+ (let* ((q (seq-remove (lambda (q) (string= "new" (plist-get q :name)))
+ searches))
+ (q (car q))
(of (eq 'oldest-first (plist-get q :sort-order)))
(query (plist-get q :query)))
(notmuch-tree query nil nil nil nil nil nil of t))