From e2f71dd9a2a7fd503cba706278715dceeabb6670 Mon Sep 17 00:00:00 2001 From: jao Date: Thu, 2 Sep 2021 00:48:27 +0100 Subject: notmuch: previous/next thread commands --- lib/net/jao-notmuch.el | 12 +++++++++++- notmuch.org | 2 ++ 2 files changed, 13 insertions(+), 1 deletion(-) diff --git a/lib/net/jao-notmuch.el b/lib/net/jao-notmuch.el index a4ce4fd..2b5656a 100644 --- a/lib/net/jao-notmuch.el +++ b/lib/net/jao-notmuch.el @@ -323,11 +323,21 @@ (interactive "P") (jao-notmuch-tree--next nil thread no-exit)) +(defun jao-notmuch-tree-next-thread (&optional exit) + "Next thread in forest, taking care of thread visibility." + (interactive "P") + (jao-notmuch-tree--next nil t (not exit))) + (defun jao-notmuch-tree-previous (thread) - "Previous message or thread in forest, taking care of thread visibility.." + "Previous message or thread in forest, taking care of thread visibility." (interactive "P") (jao-notmuch-tree--next t thread t)) +(defun jao-notmuch-tree-previous-thread (&optional exit) + "Previous thread in forest, taking care of thread visibility." + (interactive "P") + (jao-notmuch-tree--next t t (not exit))) + ;;;; Updating the tree window after insertion (defun jao-notmuch--tree-sentinel (proc &rest _) diff --git a/notmuch.org b/notmuch.org index 3494938..98528e6 100644 --- a/notmuch.org +++ b/notmuch.org @@ -344,9 +344,11 @@ ("K" . jao-notmuch-tag-jump-and-next) ("k" . jao-notmuch-tree-read-thread) ("n" . jao-notmuch-tree-next) + ("N" . jao-notmuch-tree-next-thread) ("O" . notmuch-tree-toggle-order) ("o" . jao-notmuch-tree-widen-search) ("p" . jao-notmuch-tree-previous) + ("P" . jao-notmuch-tree-previous-thread) ("s" . jao-notmuch-tree-spam) ("u" . jao-notmuch-tree-flag) ("v" . notmuch-tree-scroll-message-window) -- cgit v1.2.3