diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2023-03-25 11:53:46 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2023-04-16 13:07:22 -0700 |
commit | 767e6196aedbc9b27223362c0d2abd41f55f24b8 (patch) | |
tree | 4d24ff4a901b3313ee299a0d2a448dfa637f560d | |
parent | 2efb0d39074f2bed64e5cf3d21ffa99bd97992a5 (diff) | |
download | dotfiles-767e6196aedbc9b27223362c0d2abd41f55f24b8.tar.gz |
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.
-rw-r--r-- | .emacs.d/init.el | 8 |
1 files changed, 7 insertions, 1 deletions
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) |