summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--email.org16
1 files changed, 11 insertions, 5 deletions
diff --git a/email.org b/email.org
index 1795daf..a08771c 100644
--- a/email.org
+++ b/email.org
@@ -387,7 +387,8 @@
(defun jao-notmuch-refresh-hello ()
(interactive)
(when (derived-mode-p 'notmuch-hello-mode)
- (notmuch-refresh-this-buffer)
+ (when (not (string-blank-p jao-notmuch-minibuffer-string))
+ (notmuch-hello))
(let ((inhibit-message t))
(save-window-excursion (org-agenda-list))
(beginning-of-buffer)
@@ -493,8 +494,12 @@
(jao-notmuch-tree--tag-and-next '("+deleted" "-new") undelete nil))
(defun jao-notmuch-tree-delete-thread ()
- (interactive "P")
- (jao-notmuch-tree--tag-and-next '("+deleted" "-new") t nil))
+ (interactive)
+ (jao-notmuch-tree--tag-and-next '("+deleted" "-new") nil t))
+
+ (defun jao-notmuch-tree-read-thread ()
+ (interactive)
+ (jao-notmuch-tree--tag-and-next '("-unread" "-new") nil t))
(defun jao-notmuch-tree-scroll-or-next ()
"Scroll or next message in forest or exit if none."
@@ -532,11 +537,12 @@
(("." . jao-notmuch-toggle-mime-parts)
("d" . jao-notmuch-tree-delete-message)
("D" . jao-notmuch-tree-delete-thread)
- ("i" . jao-notmuch-toggle-images)
("h" . jao-notmuch-goto-message-buffer)
("H" . jao-notmuch-click-message-buffer)
- ("n" . jao-notmuch-tree-next)
+ ("i" . jao-notmuch-toggle-images)
("k" . jao-notmuch-tag-jump-and-next)
+ ("K" . jao-notmuch-tree-read-thread)
+ ("n" . jao-notmuch-tree-next)
("RET" . jao-notmuch-tree-show-or-scroll)
("SPC" . jao-notmuch-tree-scroll-or-next))
:map notmuch-show-mode-map