Index: openacs-4/packages/file-storage/www/version-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/version-add.tcl,v
diff -u -r1.3 -r1.3.2.1
--- openacs-4/packages/file-storage/www/version-add.tcl	5 Sep 2002 09:29:00 -0000	1.3
+++ openacs-4/packages/file-storage/www/version-add.tcl	16 Nov 2003 02:05:00 -0000	1.3.2.1
@@ -24,12 +24,7 @@
 
 # set templating datasources
 
-db_1row file_name "
-select title 
-from   cr_revisions
-where  revision_id = (select live_revision
-                      from   cr_items
-                      where  item_id = :file_id)"
+db_1row file_title ""
 
 set context [fs_context_bar_list -final "Upload New Version" $file_id]