From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp0 ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms11 with LMTPS id CEsmJ97YMl9DJQAA0tVLHw (envelope-from ) for ; Tue, 11 Aug 2020 17:43:58 +0000 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp0 with LMTPS id KFV/Id7YMl94CQAA1q6Kng (envelope-from ) for ; Tue, 11 Aug 2020 17:43:58 +0000 Received: from mail.notmuchmail.org (nmbug.tethera.net [144.217.243.247]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) server-signature RSA-PSS (2048 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id 013DD940414 for ; Tue, 11 Aug 2020 17:43:58 +0000 (UTC) Received: from [144.217.243.247] (localhost [127.0.0.1]) by mail.notmuchmail.org (Postfix) with ESMTP id 54D7729B28; Tue, 11 Aug 2020 13:43:49 -0400 (EDT) X-Greylist: delayed 398 seconds by postgrey-1.36 at nmbug; Tue, 11 Aug 2020 13:43:42 EDT Received: from jb55.com (unknown [45.79.91.128]) by mail.notmuchmail.org (Postfix) with ESMTPS id E68EB1F9DC for ; Tue, 11 Aug 2020 13:43:42 -0400 (EDT) Received: from jb55.com (S010660e327dca171.vc.shawcable.net [24.84.152.187]) by jb55.com (OpenSMTPD) with ESMTPSA id 214cb3d3 (TLSv1.2:ECDHE-RSA-AES256-GCM-SHA384:256:NO); Tue, 11 Aug 2020 17:37:30 +0000 (UTC) From: William Casarin To: notmuch@notmuchmail.org Cc: Teemu Likonen , William Casarin Subject: [PATCH v2 3/3] emacs/tree: add notmuch-tree-archive-thread-then-next Date: Tue, 11 Aug 2020 10:36:53 -0700 Message-Id: <20200811173653.18109-3-jb55@jb55.com> X-Mailer: git-send-email 2.28.0 In-Reply-To: <20200811173653.18109-1-jb55@jb55.com> References: <20200811173653.18109-1-jb55@jb55.com> MIME-Version: 1.0 Message-ID-Hash: FFPNSTMQHSAESN34XAQURSQU2EYKPY54 X-Message-ID-Hash: FFPNSTMQHSAESN34XAQURSQU2EYKPY54 X-MailFrom: jb55@jb55.com X-Mailman-Rule-Misses: dmarc-mitigation; no-senders; approved; emergency; loop; banned-address; member-moderation; header-match-notmuch.notmuchmail.org-0; nonmember-moderation; administrivia; implicit-dest; max-recipients; max-size; news-moderation; no-subject; suspicious-header X-Mailman-Version: 3.2.1 Precedence: list List-Id: "Use and development of the notmuch mail system." List-Help: List-Post: List-Subscribe: List-Unsubscribe: Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit X-Scanner: scn0 Authentication-Results: aspmx1.migadu.com; dkim=none; dmarc=none; spf=pass (aspmx1.migadu.com: domain of notmuch-bounces@notmuchmail.org designates 144.217.243.247 as permitted sender) smtp.mailfrom=notmuch-bounces@notmuchmail.org X-Spam-Score: 1.53 X-TUID: hY6+VL7M6Xwc Now that notmuch-tree-next-thread acts more like its notmuch-show counterpart, let's update the binding to move to the next thread after archiving. Signed-off-by: William Casarin --- emacs/notmuch-tree.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/emacs/notmuch-tree.el b/emacs/notmuch-tree.el index bf500b60..2bb7c80f 100644 --- a/emacs/notmuch-tree.el +++ b/emacs/notmuch-tree.el @@ -338,7 +338,7 @@ FUNC." (define-key map [mouse-1] 'notmuch-tree-show-message) (define-key map "x" 'notmuch-tree-archive-message-then-next-or-exit) (define-key map "X" 'notmuch-tree-archive-thread-then-exit) - (define-key map "A" 'notmuch-tree-archive-thread) + (define-key map "A" 'notmuch-tree-archive-thread-then-next) (define-key map "a" 'notmuch-tree-archive-message-then-next) (define-key map "z" 'notmuch-tree-to-tree) (define-key map "n" 'notmuch-tree-next-matching-message) @@ -497,6 +497,12 @@ NOT change the database." (notmuch-tree-close-message-window) (notmuch-tree query))) +(defun notmuch-tree-archive-thread-then-next () + "Archive all messages in the current buffer, then show next thread from search." + (interactive) + (notmuch-tree-archive-thread) + (notmuch-tree-next-thread)) + (defun notmuch-unthreaded-from-tree-current-query () "Switch from tree view to unthreaded view." (interactive) -- 2.28.0