(gnus-summary-exit): Recenter the group buffer if the point is out of view.
authoryamaoka <yamaoka>
Tue, 18 Jan 2000 05:39:16 +0000 (05:39 +0000)
committeryamaoka <yamaoka>
Tue, 18 Jan 2000 05:39:16 +0000 (05:39 +0000)
lisp/gnus-sum.el

index 01ad746..adfbaba 100644 (file)
@@ -5440,7 +5440,9 @@ If FORCE (the prefix), also save the .newsrc file(s)."
       (if (not quit-config)
          (progn
            (goto-char group-point)
-           (gnus-configure-windows 'group 'force))
+           (gnus-configure-windows 'group 'force)
+           (unless (pos-visible-in-window-p)
+             (recenter)))
        (gnus-handle-ephemeral-exit quit-config))
       ;; Clear the current group name.
       (unless quit-config