Index: openacs-4/packages/acs-subsite/www/admin/group-types/delete-2-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/group-types/Attic/delete-2-postgresql.xql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/acs-subsite/www/admin/group-types/delete-2-postgresql.xql 20 Aug 2001 21:52:31 -0000 1.3 +++ openacs-4/packages/acs-subsite/www/admin/group-types/delete-2-postgresql.xql 7 Aug 2017 23:47:58 -0000 1.4 @@ -1,7 +1,6 @@ - - postgresql7.1 + postgresql9.0 @@ -70,6 +69,17 @@ return 1; end; - + + + + + select o.object_id + from acs_objects o + where o.object_type = :group_type + and acs_permission__permission_p(o.object_id, :user_id, 'delete') + + + +