Index: openacs-4/packages/acs-subsite/www/members/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/members/index.tcl,v
diff -u -r1.18 -r1.19
--- openacs-4/packages/acs-subsite/www/members/index.tcl	10 Jan 2007 21:22:08 -0000	1.18
+++ openacs-4/packages/acs-subsite/www/members/index.tcl	27 Oct 2014 16:39:58 -0000	1.19
@@ -7,7 +7,7 @@
 } {
     {member_state "approved"}
     {orderby "name,asc"}
-    page:optional
+    page:naturalnum,optional
 } -validate {
     member_state_valid -requires { member_state } {
         if { [lsearch [group::possible_member_states] $member_state] == -1 } {
@@ -53,7 +53,7 @@
     set delete_p 1
 } else {
     # user doesn't have admin -- now find out if they have delete.
-    set delete_p [ad_permission_p -user_id $user_id $group_id "delete"]
+    set delete_p [permission::permission_p -party_id $user_id -object_id $group_id -privilege "delete"]
 }
 
 set actions {}