aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKatsumi Yamaoka2018-04-12 23:19:17 +0000
committerKatsumi Yamaoka2018-04-12 23:19:17 +0000
commit306a6f8d435e8283691898552391687aeff4110d (patch)
treea3840ccc75adb608aa3aa573cf59718a02452832
parentf8db783d097081d8a679a82c3a748ffb7976c4c1 (diff)
downloademacs-306a6f8d435e8283691898552391687aeff4110d.tar.gz
emacs-306a6f8d435e8283691898552391687aeff4110d.zip
* lisp/gnus/gnus-art.el (gnus-article-prepare): Make sure the article
begins with the top of the header (bug#25526).
-rw-r--r--lisp/gnus/gnus-art.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 74915a8cda9..f8a29ea2e51 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -4696,6 +4696,10 @@ If ALL-HEADERS is non-nil, no headers are hidden."
4696 (forward-line -1)) 4696 (forward-line -1))
4697 (set-window-point (get-buffer-window (current-buffer)) (point)) 4697 (set-window-point (get-buffer-window (current-buffer)) (point))
4698 (gnus-configure-windows 'article) 4698 (gnus-configure-windows 'article)
4699 ;; Make sure the article begins with the top of the header.
4700 (save-selected-window
4701 (select-window (get-buffer-window gnus-article-buffer))
4702 (goto-char (point-min)))
4699 (gnus-run-hooks 'gnus-article-prepare-hook) 4703 (gnus-run-hooks 'gnus-article-prepare-hook)
4700 t)))))) 4704 t))))))
4701 4705