From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from localhost (localhost [127.0.0.1]) by arlo.cworth.org (Postfix) with ESMTP id 9EAF06DE0F76 for ; Thu, 28 Nov 2019 08:14:34 -0800 (PST) X-Virus-Scanned: Debian amavisd-new at cworth.org X-Spam-Flag: NO X-Spam-Score: -0.353 X-Spam-Level: X-Spam-Status: No, score=-0.353 tagged_above=-999 required=5 tests=[AWL=-0.153, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1] autolearn=disabled Received: from arlo.cworth.org ([127.0.0.1]) by localhost (arlo.cworth.org [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id 4xwKKGtDKpdv for ; Thu, 28 Nov 2019 08:14:34 -0800 (PST) Received: from jb55.com (jb55.com [45.79.91.128]) by arlo.cworth.org (Postfix) with ESMTPS id 402526DE0F7C for ; Thu, 28 Nov 2019 08:14:24 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=simple/simple; d= jb55.com; h=from:to:subject:date:message-id; s=default; bh=4NAewKWqT+8zk6ZOGTFloB1K9zqXbC33XjwBN+SFGPI=; b=HjAWeUFFsKzIBSg+MrS6R1AJoYq88YMiyHJ7kfvu2mHZAHKnv6k0t52xPyUKm8X0AIX5xdnIl8lidG4fHAzmRTyN+DDGQlROe7uwRNyr7NJRRnXaM836qm+y5qyXik++fFtzpx5RMwUYqHEFSbR88ZN885diLEbYHCHASP6hwoLW7POCptXFzFKm51oj5nHDkxH9cHudPV+MOkAjbAovt6+PSX3SS0wAm+CUhyYoBHTo9ZCYWVd07WEvyXpdEE61LjyTegqskrd5zFFi1q/xla5LnjFzZUROmQOKS4k38JyUPcUI48zJQ66fiDouahyvbTYPoRYobQoVM8Kto1cy5Q== Received: from jb55.com (S0106f0f249a68533.gv.shawcable.net [24.69.143.198]) by jb55.com (OpenSMTPD) with ESMTPSA id fed81bb5 TLS version=TLSv1/SSLv3 cipher=ECDHE-RSA-AES256-GCM-SHA384 bits=256 verify=NO; Thu, 28 Nov 2019 16:14:20 +0000 (UTC) From: William Casarin To: notmuch@notmuchmail.org Subject: [PATCH v2 6/8] emacs/tree: add notmuch-tree-archive-thread-then-exit Date: Thu, 28 Nov 2019 08:13:59 -0800 Message-Id: <20191128161401.28844-7-jb55@jb55.com> X-Mailer: git-send-email 2.23.0 In-Reply-To: <20191128161401.28844-1-jb55@jb55.com> References: <20191128161401.28844-1-jb55@jb55.com> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-BeenThere: notmuch@notmuchmail.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: "Use and development of the notmuch mail system." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Thu, 28 Nov 2019 16:14:34 -0000 This is the notmuch-tree version of notmuch-show-archive-thread-then-exit Signed-off-by: William Casarin --- emacs/notmuch-tree.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/emacs/notmuch-tree.el b/emacs/notmuch-tree.el index 8e596459..40838487 100644 --- a/emacs/notmuch-tree.el +++ b/emacs/notmuch-tree.el @@ -563,6 +563,12 @@ message will be \"unarchived\", i.e. the tag changes in (notmuch-tree-archive-message unarchive) (notmuch-tree-next-matching-message)) +(defun notmuch-tree-archive-thread-then-exit () + "Archive all messages in the current buffer, then exit notmuch-tree." + (interactive) + (notmuch-tree-archive-thread) + (notmuch-tree-quit t)) + (defun notmuch-tree-archive-message-then-next-or-exit () "Archive current message, then show next open message in current thread. -- 2.23.0