Index: openacs-4/packages/cms/www/modules/permissions/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/cms/www/modules/permissions/index.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/cms/www/modules/permissions/index.tcl	20 Apr 2001 20:51:10 -0000	1.1
+++ openacs-4/packages/cms/www/modules/permissions/index.tcl	24 May 2001 23:57:17 -0000	1.2
@@ -9,7 +9,6 @@
 
 set user_id [User::getID]
 
-set db [template::get_db_handle]
 
 # Determine if the user can modify permissions on this object
 # Should it dump a user to an error page if no access ?
@@ -22,12 +21,11 @@
   -user_id $user_id -mount_point $mount_point -parent_id $parent_id
 
 if { ![string equal $user_permissions(cm_perm) t] } {
-  template::release_db_handle
   return
 }
 
 # Get a list of permissions that users have on the item
-template::query permissions multirow "
+template::query get_permissions permissions multirow "
   select * from ( 
     select 
       p.pretty_name, 
@@ -68,8 +66,6 @@
     grantee_name, privilege
   " 
 
-template::release_db_handle
-
 # Create a URL passthrough stub to access permissions
 set perms_url_extra "return_url=$return_url&passthrough=$passthrough&object_id=$object_id"