From: yamaoka <yamaoka>
Date: Fri, 8 Oct 1999 09:42:58 +0000 (+0000)
Subject: (gnus-summary-select-article): Expose all hidden text if the command
X-Git-Tag: t-gnus-6_13_2-07~2
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=848ee3b30e549848d9ffcf1b37db0cc736966420;p=elisp%2Fgnus.git-

(gnus-summary-select-article): Expose all hidden text if the command
`gnus-summary-toggle-mime' is used.
---

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index b10afd3..f180d5d 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -5831,7 +5831,9 @@ be displayed."
 		  (gnus-summary-display-article article all-headers)
 		(setq did article)
 		(when (or all-headers gnus-show-all-headers)
-		  (gnus-article-show-all-headers)))
+		  (if (eq 'gnus-summary-toggle-mime this-command)
+		      (gnus-article-show-all)
+		    (gnus-article-show-all-headers))))
 	    (when (or all-headers gnus-show-all-headers)
 	      (gnus-article-show-all-headers))
 	    'old))