Index: openacs-4/packages/download/tcl/download-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/tcl/download-procs.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/download/tcl/download-procs.tcl	16 May 2001 09:41:05 -0000	1.3
+++ openacs-4/packages/download/tcl/download-procs.tcl	22 May 2001 04:18:16 -0000	1.4
@@ -337,7 +337,7 @@
     }
 
 	# get the file_size for the postgres version
-	set file_size [file size $upload_file]
+	set file_size [file size $tmpfile]
 
     set mime_type [download_maybe_create_new_mime_type $upload_file]
     db_exec_plsql revision_new {