From 767e6196aedbc9b27223362c0d2abd41f55f24b8 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sat, 25 Mar 2023 11:53:46 -0700 Subject: spw/gnus: jump to group corresponding to the saveable summary buffer This makes it quick to use this command to return to an open saveable summary. --- .emacs.d/init.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/.emacs.d/init.el b/.emacs.d/init.el index e3dba6c8..4cc7b3cf 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -3280,7 +3280,13 @@ mutt's review view, after exiting EDITOR." (gnus-group-read-group nil t group) (pop-to-buffer-same-window buffer) (gnus-summary-rescan-group))) - (if (gnus-alive-p) (pop-to-buffer-same-window gnus-group-buffer) (gnus)))) + (if (not (gnus-alive-p)) + (gnus) + (pop-to-buffer-same-window gnus-group-buffer) + (when (buffer-live-p spw/saveable-notmuch-nnselect-summary) + (gnus-group-jump-to-group + (buffer-local-value 'gnus-newsgroup-name + spw/saveable-notmuch-nnselect-summary)))))) (global-set-key "\C-cgn" #'spw/gnus) (defun spw/gnus-goto-all-articles (group article) -- cgit v1.2.3