Index: openacs-4/packages/chat/tcl/chat-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/tcl/chat-procs.tcl,v
diff -u -r1.5.2.6 -r1.5.2.7
--- openacs-4/packages/chat/tcl/chat-procs.tcl	25 Apr 2006 10:43:50 -0000	1.5.2.6
+++ openacs-4/packages/chat/tcl/chat-procs.tcl	20 Jun 2006 00:28:19 -0000	1.5.2.7
@@ -281,6 +281,8 @@
 } {
     Explicit ban user from this chat room.
 } {
+    util_memoize_flush  \
+	"permission::permission_p_not_cached -party_id $party_id -object_id $room_id -privilege chat_ban"
     db_exec_plsql ban_user {}
 }
 
@@ -291,6 +293,8 @@
 } {
     unban user from this chat room.
 } {
+    util_memoize_flush  \
+	"permission::permission_p_not_cached -party_id $party_id -object_id $room_id -privilege chat_ban"
     db_exec_plsql ban_user {}
 }