Index: openacs-4/packages/evaluation/www/admin/evaluations/evaluate-students-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/evaluations/evaluate-students-2.tcl,v
diff -u -N -r1.10 -r1.11
--- openacs-4/packages/evaluation/www/admin/evaluations/evaluate-students-2.tcl	14 Sep 2004 21:44:11 -0000	1.10
+++ openacs-4/packages/evaluation/www/admin/evaluations/evaluate-students-2.tcl	23 Nov 2004 23:13:52 -0000	1.11
@@ -163,19 +163,19 @@
 			     -title $title -mime_type $mime_type]
 	
 	evaluation::set_live -revision_id $revision_id
+	set content_length [file size $tmp_filename]
 
 	if { [parameter::get -parameter "StoreFilesInDatabaseP" -package_id [ad_conn package_id]] } {
 	    # create the new item
 	    
-	    set filename [cr_create_content_file $item_id $revision_id $tmp_file]
+	    set filename [cr_create_content_file $grades_sheet_item_id $revision_id $tmp_filename]
 	    db_dml set_file_content { *SQL* }
 	    
 	} else {
 
 	    # create the new item
 	    db_dml lob_content { *SQL* } -blob_files [list $tmp_filename]
 	    
-	    set content_length [file size $tmp_filename]
 	    # Unfortunately, we can only calculate the file size after the lob is uploaded 
 	    db_dml lob_size { *SQL* }
 	}