Index: openacs-4/packages/assessment-portlet/www/assessment-portlet-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment-portlet/www/assessment-portlet-postgresql.xql,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/assessment-portlet/www/assessment-portlet-postgresql.xql	26 Feb 2008 15:57:16 -0000	1.15
+++ openacs-4/packages/assessment-portlet/www/assessment-portlet-postgresql.xql	7 Aug 2017 23:48:04 -0000	1.16
@@ -32,10 +32,8 @@
              (select distinct asm.assessment_id
               from as_assessment_section_map asm, as_item_section_map ism
               where ism.section_id = asm.section_id
-	      and exists (select 1 from acs_object_party_privilege_map ppm
-                  where ppm.object_id = asm.assessment_id
-                  and ppm.privilege = 'read'
-                  and ppm.party_id = :user_id)) s
+	      and acs_permission__permission_p(asm.assessment_id, :user_id, 'read')
+	      ) s
 	where a.assessment_id = cr.revision_id
 	and cr.revision_id = ci.latest_revision
 	and ci.parent_id = cf.folder_id