From: yamaoka <yamaoka>
Date: Fri, 7 Jan 2000 11:35:00 +0000 (+0000)
Subject: (gnus-summary-reselect-current-group): Truncate lines in the imitation buffer;
X-Git-Tag: t-gnus-6_14_1-02~13
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=59780d1fbddfc1792e3d27885c62b6ded64093ba;p=elisp%2Fgnus.git-

(gnus-summary-reselect-current-group): Truncate lines in the imitation buffer;
turn off h-scrollbar for XEmacs.
---

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 14186b6..9df344d 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -5301,13 +5301,17 @@ The prefix argument ALL means to select all articles."
 	  (set-buffer-modified-p nil)
 	  (goto-char (1+ (max 0 pos)))
 	  (setq mode-line-buffer-identification id
-		mode-name "Masquerade"))))
+		mode-name "Masquerade"
+		truncate-lines t))))
     (setq gnus-newsgroup-begin nil)
     (gnus-summary-exit)
     (if rescan
 	(progn
 	  (switch-to-buffer masquerade)
 	  (set-window-start (selected-window) (point-min))
+	  (static-when (featurep 'xemacs)
+	    (gnus-xmas-switch-horizontal-scrollbar-off)
+	    (redraw-frame))
 	  (set-buffer gnus-group-buffer)
 	  (gnus-group-jump-to-group group)
 	  (unwind-protect