Index: openacs-4/packages/file-storage/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/index.tcl,v
diff -u -N -r1.14 -r1.15
--- openacs-4/packages/file-storage/www/index.tcl	22 May 2002 16:42:31 -0000	1.14
+++ openacs-4/packages/file-storage/www/index.tcl	22 May 2002 16:47:41 -0000	1.15
@@ -36,12 +36,6 @@
 
 # set templating datasources
 set folder_name [fs_get_folder_name $folder_id]
-set ext [fs::get_archive_extension]
-set download_name $folder_name
-if {![empty_string_p $ext]} {
-    append download_name ".${ext}"
-}
-set download_name [ns_urlencode $download_name]
 
 set user_id [ad_conn user_id]
 set write_p [ad_permission_p $folder_id write]