From c36e91d9d4774666064a840b19ccf7880f658ad1 Mon Sep 17 00:00:00 2001 From: Mark Walters Date: Thu, 27 Feb 2020 17:16:50 +0000 Subject: [PATCH] Unthreaded mode: allow user to choose different `show out' than tree Tree mode allows the user to choose whether to use the split screen displaying just the current message or a full screen displaying the entire thread. As unthreaded mode is quite different in use the user may want a different customisation for this mode. --- emacs/notmuch-tree.el | 14 ++++++++++++-- 1 file changed, 12 insertions(+), 2 deletions(-) diff --git a/emacs/notmuch-tree.el b/emacs/notmuch-tree.el index 760eaaec..895c05f4 100644 --- a/emacs/notmuch-tree.el +++ b/emacs/notmuch-tree.el @@ -56,6 +56,16 @@ :type 'boolean :group 'notmuch-tree) +(defcustom notmuch-unthreaded-show-out t + "View selected messages in new window rather than split-pane." + :type 'boolean + :group 'notmuch-tree) + +(defun notmuch-tree-show-out () + (if notmuch-tree-unthreaded + notmuch-unthreaded-show-out + notmuch-tree-show-out)) + (defcustom notmuch-tree-result-format `(("date" . "%12s ") ("authors" . "%-20s") @@ -531,8 +541,8 @@ NOT change the database." Shows in split pane or whole window according to value of `notmuch-tree-show-out'. A prefix argument reverses the choice." (interactive "P") - (if (or (and notmuch-tree-show-out (not arg)) - (and (not notmuch-tree-show-out) arg)) + (if (or (and (notmuch-tree-show-out) (not arg)) + (and (not (notmuch-tree-show-out)) arg)) (notmuch-tree-show-message-out) (notmuch-tree-show-message-in)))