Index: openacs-4/packages/file-storage/www/folder-chunk-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-chunk-postgresql.xql,v
diff -u -r1.18 -r1.19
--- openacs-4/packages/file-storage/www/folder-chunk-postgresql.xql	2 Apr 2013 12:04:43 -0000	1.18
+++ openacs-4/packages/file-storage/www/folder-chunk-postgresql.xql	7 Aug 2017 23:48:11 -0000	1.19
@@ -30,13 +30,10 @@
                    end as new_p
             from fs_objects
             where fs_objects.parent_id = :folder_id
-              and exists (select 1
-                   from acs_object_party_privilege_map m
-                   where m.object_id = fs_objects.object_id
-                     and m.party_id = :viewing_user_id
-                     and m.privilege = 'read')
-                $categories_limitation
-		$orderby
+	    and   acs_permission__permission_p(fs_objects.object_id, :viewing_user_id, 'read')
+
+            $categories_limitation
+	    $orderby
         </querytext>
     </fullquery>