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.42.2.3 -r1.42.2.4
--- openacs-4/packages/file-storage/tcl/file-storage-procs-postgresql.xql	4 Oct 2005 15:16:12 -0000	1.42.2.3
+++ openacs-4/packages/file-storage/tcl/file-storage-procs-postgresql.xql	10 Dec 2005 11:55:49 -0000	1.42.2.4
@@ -364,4 +364,11 @@
     </querytext>
   </fullquery>
 
+    <fullquery name="fs::get_object_prettyname.select_object_prettyname">
+        <querytext>
+            select coalesce(title,name) as prettyname
+            from fs_objects
+            where object_id = :object_id
+        </querytext>
+    </fullquery>
 </queryset>