Index: openacs-4/packages/chat/www/user-revoke.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/user-revoke.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/chat/www/user-revoke.tcl	20 Apr 2001 20:51:08 -0000	1.1
+++ openacs-4/packages/chat/www/user-revoke.tcl	4 Sep 2002 08:12:51 -0000	1.2
@@ -13,7 +13,7 @@
 
 ad_require_permission $room_id chat_user_revoke
 
-set context_bar [ad_context_bar [list "room?room_id=$room_id" "Room information"] "Revoke user"]
+set context_bar [list [list "room?room_id=$room_id" "Room information"] "Revoke user"]
 
 set party_pretty_name [db_string get_party_name "select acs_object.name(:party_id) from dual"]