notmuch: better one pane

1 files changed, 9 insertions, 5 deletions

diff --git a/custom/jao-custom-notmuch.el b/custom/jao-custom-notmuch.el
index dd0d4bd..92b9be0 100644
--- a/custom/jao-custom-notmuch.el
+++ b/custom/jao-custom-notmuch.el
@@ -511,19 +511,22 @@ ch--search-keys i)
 
   (defun jao-notmuch-before-tree (&rest _args)
     (window-configuration-to-register ?G)
-    (when t ;; (string= (buffer-name) "*notmuch-hello*")
+    (when (string= (buffer-name) "*notmuch-hello*")
       (when (< (frame-width) 230) (delete-other-windows))
       (split-window-right 40)
       (other-window 1)))
 
-  (defvar jao-notmuch--visits 0)
-
   (defun jao-notmuch-after-tree-quit (&optional _both)
     (when (not (derived-mode-p 'notmuch-tree-mode 'notmuch-hello-mode))
       (jump-to-register ?G)
       (when (not (derived-mode-p 'notmuch-hello-mode))
-        (jao-notmuch-notify-and-update)))
-    (jao-notmuch-refresh-hello (= 0 (mod (cl-incf jao-notmuch--visits) 5))))
+        (jao-notmuch-notify-and-update))))
+
+  (defvar jao-notmuch--visits 0)
+
+  (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)))
 
   (defun jao-notmuch-tree--sentinel (proc)
     (when (eq (process-status proc) 'exit)
@@ -535,6 +538,7 @@ ch--search-keys i)
       (jao-notmuch-thread-info-mode)))
 
   (add-hook 'notmuch-tree-process-exit-functions #'jao-notmuch-tree--sentinel)
+  (advice-add 'notmuch-tree-quit :after #'jao-notmuch--maybe-notify-and-update)
 
   (defun jao-notmuch-use-two-panes ()
     (interactive)