Index: openacs-4/packages/evaluation/www/admin/tasks/solution-add-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/tasks/solution-add-edit.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/evaluation/www/admin/tasks/solution-add-edit.tcl	4 Apr 2005 18:22:36 -0000	1.13
+++ openacs-4/packages/evaluation/www/admin/tasks/solution-add-edit.tcl	7 Apr 2005 11:27:00 -0000	1.14
@@ -51,7 +51,7 @@
 		{upload_file:file,optional
 		    {label "[_ evaluation.File_]"} 
 		    {html "size 30"}
-		    {help_text "[_ evaluation.lt_Currently_title_is_at]"}
+		    {help_text "[_ evaluation.lt_Currently_title_is_at_2]"}
 		}
 		{unattach_p:text(checkbox),optional 
 		    {label "[_ evaluation.Unattach_file_]"} 
@@ -68,7 +68,7 @@
 		{upload_file:text,optional
 		    {label "[_ evaluation.File_]"} 
 		    {html "size 30"}
-		    {after_html "<a href=\"[export_vars -base \"../../view/$content\" { revision_id }]\">$content</a>"}
+		    {after_html "<a href=\"[export_vars -base \"../../view/$content\" { revision_id }]\">$title</a>"}
 		}
 		{unattach_p:text(hidden)
 		}
@@ -186,7 +186,7 @@
 		set title [template::util::file::get_property filename $upload_file]
 		set mime_type [cr_filename_to_mime_type -create $title]
 
-		if { [parameter::get -parameter "StoreFilesInDatabaseP" -package_id [ad_conn package_id]] } {
+		if { ![parameter::get -parameter "StoreFilesInDatabaseP" -package_id [ad_conn package_id]] } {
 		    set storage_type file
 		}
 	    }  elseif { ![string eq $url "http://"] } {
@@ -220,18 +220,20 @@
 		set content_length [file size $tmp_file]
 		
 		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]
-		    db_dml set_file_content { *SQL* }
-		    
-		} else {
 
 		    # create the new item
 		    db_dml lob_content { *SQL* } -blob_files [list $tmp_file]
 		    
 		    # Unfortunately, we can only calculate the file size after the lob is uploaded 
 		    db_dml lob_size { *SQL* }
+
+		} else {
+
+		    # create the new item
+		    
+		    set file_name [cr_create_content_file $item_id $revision_id $tmp_file]
+		    db_dml set_file_content { *SQL* }
+		    
 		}
 		
 	    } elseif { ![string eq $url "http://"] } {