Sync up with qgnus-0.30.
authormorioka <morioka>
Mon, 23 Feb 1998 11:59:40 +0000 (11:59 +0000)
committermorioka <morioka>
Mon, 23 Feb 1998 11:59:40 +0000 (11:59 +0000)
lisp/gnus-art.el

index 6ad9a2b..6cf74ac 100644 (file)
@@ -2074,15 +2074,7 @@ If ALL-HEADERS is non-nil, no headers are hidden."
                ;; <sisolak@trans4.neep.wisc.edu>.
                (gnus-set-global-variables)
                (setq gnus-have-all-headers
-                     (or all-headers gnus-show-all-headers))
-               (and gnus-use-cache
-                    (vectorp (gnus-summary-article-header article))
-                    (gnus-cache-possibly-enter-article
-                     group article
-                     (gnus-summary-article-header article)
-                     (memq article gnus-newsgroup-marked)
-                     (memq article gnus-newsgroup-dormant)
-                     (memq article gnus-newsgroup-unreads)))))
+                     (or all-headers gnus-show-all-headers))))
            (when (or (numberp article)
                      (stringp article))
              ;; Hooks for getting information from the article.
@@ -2364,7 +2356,7 @@ Argument LINES specifies lines to be scrolled down."
 This means that PGP stuff, signatures, cited text and (some)
 headers will be hidden.
 If given a prefix, show the hidden text instead."
-  (interactive (list current-prefix-arg 'force))
+  (interactive (append (gnus-article-hidden-arg) (list 'force)))
   (gnus-article-hide-headers arg)
   (gnus-article-hide-pgp arg)
   (gnus-article-hide-citation-maybe arg force)