Index: openacs-4/packages/file-storage/tcl/file-storage-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/tcl/file-storage-procs-postgresql.xql,v
diff -u -N -r1.28 -r1.29
--- openacs-4/packages/file-storage/tcl/file-storage-procs-postgresql.xql	26 Jul 2002 01:01:21 -0000	1.28
+++ openacs-4/packages/file-storage/tcl/file-storage-procs-postgresql.xql	17 Sep 2002 21:03:26 -0000	1.29
@@ -58,6 +58,7 @@
                          fs_objects.url,
                          fs_objects.key,
                          fs_objects.sort_key,
+                         fs_objects.file_upload_name,
                          case when fs_objects.last_modified >= (now() - $n_past_days) then 1 else 0 end as new_p,
                          acs_permission__permission_p(fs_objects.object_id, :user_id, 'admin') as admin_p,
                          acs_permission__permission_p(fs_objects.object_id, :user_id, 'delete') as delete_p,
@@ -80,7 +81,7 @@
         <querytext>
             select count(*)
             from cr_items c1, cr_items c2
-            where c2.item_id = :item_id
+            where c2.item_id = file_storage__get_parent_id(:item_id)
             and c1.tree_sortkey between c2.tree_sortkey and tree_right(c2.tree_sortkey)
             and not acs_permission__permission_p(c1.item_id, :user_id, :privilege)
         </querytext>