From 56a361930841f03c7ce733c691ee1208b95ebaed Mon Sep 17 00:00:00 2001 From: yamaoka Date: Fri, 12 Feb 1999 07:06:58 +0000 Subject: [PATCH] * (article-hide-headers): Show all headers when unhiding. --- lisp/gnus-art.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index 595c6f7..fef6d90 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -653,7 +653,10 @@ always hide." (current-buffer) (if (gnus-article-check-hidden-text 'headers arg) ;; Show boring headers as well. - (gnus-article-show-hidden-text 'boring-headers) + (progn + (gnus-article-show-hidden-text 'boring-headers) + (when (eq 1 (point-min)) + (set-window-start (get-buffer-window (current-buffer)) 1))) ;; This function might be inhibited. (unless gnus-inhibit-hiding (save-excursion -- 1.7.10.4