Index: openacs-4/packages/acs-tcl/tcl/acs-permissions-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/acs-permissions-procs-postgresql.xql,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/acs-tcl/tcl/acs-permissions-procs-postgresql.xql	2 Apr 2013 11:05:18 -0000	1.11
+++ openacs-4/packages/acs-tcl/tcl/acs-permissions-procs-postgresql.xql	7 Aug 2017 23:47:59 -0000	1.12
@@ -24,8 +24,7 @@
 
     <fullquery name="permission::require_permission.name">      
         <querytext>
-            select acs_object__name(:object_id)
-            from dual
+            select acs_object__name(:object_id) from dual
         </querytext>
     </fullquery>
 
@@ -37,11 +36,12 @@
         </querytext>
     </fullquery>
 
-    <fullquery name="permission::permission_p_not_cached.select_permission_p">
-        <querytext>
-            select acs_permission__permission_p(:object_id, :party_id, :privilege)
-        </querytext>
+    <fullquery name="permission::get_parties_with_permission.get_parties">
+      <querytext>
+        select distinct o.title, p.party_id
+        from acs_permission.parties_with_object_privilege(:object_id, :privilege) p, acs_objects o
+        where p.party_id = o.object_id
+      </querytext>
     </fullquery>
-
-
+    
 </queryset>