Index: openacs-4/packages/evaluation/www/admin/evaluations/grades-sheet-parse.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/evaluations/grades-sheet-parse.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/evaluation/www/admin/evaluations/grades-sheet-parse.tcl	24 Sep 2004 21:23:14 -0000	1.10
+++ openacs-4/packages/evaluation/www/admin/evaluations/grades-sheet-parse.tcl	29 Sep 2004 17:44:59 -0000	1.11
@@ -129,7 +129,7 @@
 	    } 
 
 	    # editing without reason
-	    if { ![string eq [lc_numeric %.2f [db_string check_evaluated { *SQL* } -default $grade]] [lc_numeric %.2f $grade]] && [empty_string_p $comments] } { 
+	    if { ![string eq [format %.2f [db_string check_evaluated { *SQL* } -default $grade]] [format %.2f $grade]] && [empty_string_p $comments] } { 
 		incr errors
 		append errors_text "<li> [_ evaluation.lt_There_must_be_an_edit]</li>"
 	    }