[Emacs-diffs] master e9f1260: Tweak point placement in gnus-summary-select-article-buffer

[Lars Ingebrigtsen]

branch: master
commit e9f1260773335f0828de5815cdad0662a4e50e04
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Tweak point placement in gnus-summary-select-article-buffer
    
    * lisp/gnus/gnus-sum.el (gnus-summary-select-article-buffer):
    Tweak where point is placed because when the user selects the
    article buffer, it's probably to cite something or click on
    something, and not do anything with the headers.
---
 lisp/gnus/gnus-sum.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index e1789cd..b1e9d60 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -7067,7 +7067,11 @@ buffer."
         'only-article
        'article)
      t)
-    (select-window (get-buffer-window gnus-article-buffer))))
+    (select-window (get-buffer-window gnus-article-buffer))
+    ;; If we've just selected the message, place point at the start of
+    ;; the body because that's probably where we want to be.
+    (when (bobp)
+      (article-goto-body))))
 
 (defun gnus-summary-universal-argument (arg)
   "Perform any operation on all articles that are process/prefixed."