aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authormartin rudalics2018-04-13 07:42:19 +0000
committerKatsumi Yamaoka2018-04-13 07:42:19 +0000
commita20d2e6625392cced400f5983f998bf2673c9d57 (patch)
tree6d76655a6ebf7590d38cb5c3741e9b8d9a06a236
parent93678bffe6427b9d83dae032c56a4e480539a4a7 (diff)
downloademacs-a20d2e6625392cced400f5983f998bf2673c9d57.tar.gz
emacs-a20d2e6625392cced400f5983f998bf2673c9d57.zip
* lisp/gnus/gnus-art.el (gnus-article-prepare): Fix previous commit,
in which selecting the article window is not necessary (bug#25526).
-rw-r--r--lisp/gnus/gnus-art.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index f8a29ea2e51..ed6e77fb329 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -4697,9 +4697,10 @@ If ALL-HEADERS is non-nil, no headers are hidden."
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. 4699 ;; Make sure the article begins with the top of the header.
4700 (save-selected-window 4700 (let ((window (get-buffer-window gnus-article-buffer)))
4701 (select-window (get-buffer-window gnus-article-buffer)) 4701 (when window
4702 (goto-char (point-min))) 4702 (with-current-buffer (window-buffer window)
4703 (set-window-point window (point-min)))))
4703 (gnus-run-hooks 'gnus-article-prepare-hook) 4704 (gnus-run-hooks 'gnus-article-prepare-hook)
4704 t)))))) 4705 t))))))
4705 4706