Gnus development mailing list
 help / color / mirror / Atom feed
* bug: 't' in summary buffer
@ 1999-02-21  4:15 Shenghuo ZHU
  0 siblings, 0 replies; only message in thread
From: Shenghuo ZHU @ 1999-02-21  4:15 UTC (permalink / raw)



When press 't' in summary buffer, the body of the article
disappears.

A patch attached.

-- 
Shenghuo ZHU

Sat Feb 20 23:09:40 1999  Shenghuo ZHU  <zsh@cs.rochester.edu>

	* gnus-sum.el (gnus-summary-toggle-header): Save restriction.


--- gnus-sum.el	1999/02/21 03:43:59	1.1
+++ gnus-sum.el	1999/02/21 04:08:46
@@ -7026,13 +7026,14 @@
 	(goto-char (point-min))
 	(setq e (1- (or (search-forward "\n\n" nil t) (point-max)))))
       (insert-buffer-substring gnus-original-article-buffer 1 e)
-      (narrow-to-region (point-min) (point))
-      (if (or hidden
-	      (and (numberp arg) (< arg 0)))
-	  (let ((gnus-treat-hide-headers nil)
-		(gnus-treat-hide-boring-headers nil))
-	    (gnus-treat-article 'head))
-	(gnus-treat-article 'head)))))
+      (save-restriction
+	(narrow-to-region (point-min) (point))
+	(if (or hidden
+		(and (numberp arg) (< arg 0)))
+	    (let ((gnus-treat-hide-headers nil)
+		  (gnus-treat-hide-boring-headers nil))
+	      (gnus-treat-article 'head))
+	  (gnus-treat-article 'head))))))
 
 (defun gnus-summary-show-all-headers ()
   "Make all header lines visible."


^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~1999-02-21  4:15 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1999-02-21  4:15 bug: 't' in summary buffer Shenghuo ZHU

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).