From: yamaoka <yamaoka>
Date: Wed, 16 Jun 2004 11:25:44 +0000 (+0000)
Subject: Synch to No Gnus 200406161125.
X-Git-Tag: t-gnus-6_17_4-quimby-~858
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=4c0d5eef2b5d6d3bf17d0d892283df78b3a7f046;p=elisp%2Fgnus.git-

Synch to No Gnus 200406161125.
---

diff --git a/lisp/gnus-srvr.el b/lisp/gnus-srvr.el
index 240ff3b..856b514 100644
--- a/lisp/gnus-srvr.el
+++ b/lisp/gnus-srvr.el
@@ -395,9 +395,7 @@ The following commands are available:
 	  (progn
 	    ;; Remove the server from `gnus-opened-servers' since
 	    ;; it has never been opened with the new `info' yet.
-	    (setq gnus-opened-servers
-		  (delq (assoc (cdr entry) gnus-opened-servers)
-			gnus-opened-servers))
+	    (gnus-opened-servers-remove (cdr entry))
 	    (setcdr entry info))
 	(setq gnus-server-alist
 	      (nconc gnus-server-alist (list (cons server info))))))))