more notmuch tweaksmain

1 files changed, 8 insertions, 4 deletions

diff --git a/custom/jao-custom-notmuch.el b/custom/jao-custom-notmuch.el
index a4f486f..4d797c8 100644
--- a/custom/jao-custom-notmuch.el
+++ b/custom/jao-custom-notmuch.el
@@ -46,7 +46,9 @@
 
 (defun jao-notmuch-notify-and-update ()
   (jao-notmuch-notify)
-  (with-current-buffer "*notmuch-hello*" (notmuch-refresh-this-buffer)))
+  (with-current-buffer "*notmuch-hello*"
+    (notmuch-hello-update)
+    (jao-notmuch-hello-first)))
 
 (when jao-notmuch-enabled
   (jao-minibuffer-add-variable 'jao-notmuch-minibuffer-string -20))
@@ -126,7 +128,7 @@
   `(,(jao-notmuch--q "inbox" "i")
     ,(jao-notmuch--q "write" "w")
     ,(jao-notmuch--q "drivel" "d")
-    ,(jao-notmuch--q "hacking" "h")
+    ,(jao-notmuch--q "trove" "t")
     ,(jao-notmuch--q "local" "x")))
 
 (jao-notmuch-def-searches news
@@ -146,6 +148,7 @@
                 ("le" "emacs")
                 ("lg" "geiser")
                 ("lh" "haskell")
+                ("ll" "lisp")
                 ("ln" "notmuch")
                 ("lr" "rust")
                 ("ls" "scheme")
@@ -165,7 +168,7 @@
   t)
 
 (jao-notmuch-def-searches nil
-  `(,(jao-notmuch--q "flagged" "F" nil '("tag:flagged" "tag:jao"))))
+  `(,(jao-notmuch--q "flagged" "F" nil '("tag:flagged"))))
 
 (jao-notmuch-def-searches today
   `(,(jao-notmuch--q "new" "N" nil (list jao-notmuch--new "not tag:draft"))
@@ -529,7 +532,8 @@
 
   (defun jao-notmuch--maybe-notify-and-update (&optional _both)
     (when (not (derived-mode-p 'notmuch-hello-mode 'notmuch-tree-mode))
-      (jao-notmuch-notify-and-update)))
+      (jao-notmuch-notify-and-update))
+    (jao-notmuch-refresh-hello))
 
   (defun jao-notmuch-tree--sentinel (proc)
     (when (eq (process-status proc) 'exit)