From 84ac6eaf1d970bf4aa83d9e345d16bad42b51a07 Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 29 Jun 1998 12:13:25 +0000 Subject: [PATCH] (gnus-article-prepare): Set up `gnus-article-current-summary' of gnus-article-buffer. (gnus-request-article-this-buffer): Don't set up `gnus-article-current-summary'. --- lisp/gnus-art.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index 830e8bf..02480f7 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -2100,6 +2100,8 @@ If ALL-HEADERS is non-nil, no headers are hidden." (gnus-run-hooks 'gnus-article-prepare-hook) ;; Display message. (funcall method) + ;; Associate this article with the current summary buffer. + (setq gnus-article-current-summary summary-buffer) ;; Perform the article display hooks. (gnus-run-hooks 'gnus-article-display-hook)) ;; Do page break. @@ -2496,9 +2498,6 @@ If given a prefix, show the hidden text instead." ;; It was a pseudo. (t article))) - ;; Associate this article with the current summary buffer. - (setq gnus-article-current-summary gnus-summary-buffer) - ;; Update sparse articles. (when (and do-update-line (or (numberp article) -- 1.7.10.4