summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2023-03-25 11:53:46 -0700
committerSean Whitton <spwhitton@spwhitton.name>2023-04-16 13:07:22 -0700
commit767e6196aedbc9b27223362c0d2abd41f55f24b8 (patch)
tree4d24ff4a901b3313ee299a0d2a448dfa637f560d
parent2efb0d39074f2bed64e5cf3d21ffa99bd97992a5 (diff)
downloaddotfiles-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.el8
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)