From: keiichi <keiichi>
Date: Wed, 25 Jul 2001 02:11:47 +0000 (+0000)
Subject: (nntp-possibly-change-group): Clean up trash string when connect to the
X-Git-Tag: nana-gnus-7_1_0_25~1
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6449685c2884f39ab423d34c1b70dde62936ec27;p=elisp%2Fgnus.git-

(nntp-possibly-change-group): Clean up trash string when connect to the
server.
---

diff --git a/lisp/nntp.el b/lisp/nntp.el
index 167ed75..13f877f 100644
--- a/lisp/nntp.el
+++ b/lisp/nntp.el
@@ -1069,6 +1069,8 @@ password contained in '~/.nntp-authinfo'."
 	  (erase-buffer)
 	  (nntp-send-command "^[245].*\n" "GROUP" group)
 	  (setcar (cddr entry) group)
+	  (erase-buffer)
+	  (set-buffer nntp-server-buffer)
 	  (erase-buffer))))))
 
 (defun nntp-decode-text (&optional cr-only)