Index: openacs-4/packages/chat/www/search-3.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/search-3.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/chat/www/search-3.tcl	19 Nov 2007 01:14:16 -0000	1.4
+++ openacs-4/packages/chat/www/search-3.tcl	17 Jun 2016 17:36:11 -0000	1.5
@@ -7,10 +7,10 @@
 }
 
 if {$type eq "user"} {
-  ad_require_permission $room_id chat_user_grant
+  permission::require_permission -object_id $room_id -privilege chat_user_grant
   chat_user_grant $room_id $party_id
 } else {
-  ad_require_permission $room_id chat_user_ban
+  permission::require_permission -object_id $room_id -privilege chat_user_ban
   chat_user_ban $room_id $party_id
 }
 ad_returnredirect "room?room_id=$room_id"