Index: openacs-4/packages/evaluation/www/admin/grades/grades.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/grades/grades.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/evaluation/www/admin/grades/grades.tcl	22 Dec 2004 22:06:40 -0000	1.13
+++ openacs-4/packages/evaluation/www/admin/grades/grades.tcl	21 Mar 2005 15:42:00 -0000	1.14
@@ -85,10 +85,10 @@
 
 db_1row get_total_weight { *SQL* }
 
-set total_weight [lc_numeric %.2f $total_weight]
+set total_weight [format %.2f $total_weight]
 
 if { ![string eq $total_weight "100.00"] && ![string eq $total_weight "0"] } {
-    set notice "<span style=\"font-style: italic; color: red;\">[_ evaluation.lt_The_sum_of_the_weight]</span>"
+    set notice "es $total_weight <span style=\"font-style: italic; color: red;\">[_ evaluation.lt_The_sum_of_the_weight]</span>"
 } else {
     set notice ""
 }