Index: openacs-4/packages/acs-subsite/www/admin/rel-types/one-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/rel-types/one-postgresql.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-subsite/www/admin/rel-types/one-postgresql.xql	11 Aug 2001 21:31:03 -0000	1.2
+++ openacs-4/packages/acs-subsite/www/admin/rel-types/one-postgresql.xql	28 Nov 2001 18:39:39 -0000	1.3
@@ -26,11 +26,8 @@
 
     select v_inner.* 
       from (select r.rel_id, acs_object__name(r.object_id_one) || ' and ' || acs_object__name(r.object_id_two) as name
-              from acs_rels r, acs_object_party_privilege_map perm,
-                   app_group_distinct_rel_map m
-             where perm.object_id = r.rel_id
-               and perm.party_id = :user_id
-               and perm.privilege = 'read'
+              from acs_rels r, app_group_distinct_rel_map m
+             where acs_permission__permission_p(r.rel_id, :user_id, 'read')
                and r.rel_type = :rel_type
                and m.rel_id = r.rel_id
                and m.package_id = :package_id