From faa3064ee8cf05c35927477321366f3de58faa92 Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Fri, 4 Feb 2005 08:47:31 +0000
Subject: [PATCH] Fixed.

---
 lisp/riece-300.el |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/riece-300.el b/lisp/riece-300.el
index dd33c6d..6a92ac5 100644
--- a/lisp/riece-300.el
+++ b/lisp/riece-300.el
@@ -419,7 +419,8 @@
 	     (start 0)
 	     users)
 	(if entry
-	    (setcdr entry nil))
+	    (setq riece-353-message-alist
+		  (delq entry riece-353-message-alist)))
 	(while (string-match
 		(concat "\\([@+]\\)?\\(" riece-user-regexp "\\) *")
 		string start)
-- 
1.7.10.4