From 4c0d5eef2b5d6d3bf17d0d892283df78b3a7f046 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Wed, 16 Jun 2004 11:25:44 +0000 Subject: [PATCH] Synch to No Gnus 200406161125. --- lisp/gnus-srvr.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) 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)))))))) -- 1.7.10.4