Index: openacs-4/packages/evaluation/www/admin/grades/distribution-edit-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/grades/distribution-edit-2.tcl,v
diff -u -N -r1.1.1.1.4.1 -r1.1.1.1.4.2
--- openacs-4/packages/evaluation/www/admin/grades/distribution-edit-2.tcl	31 May 2005 23:13:11 -0000	1.1.1.1.4.1
+++ openacs-4/packages/evaluation/www/admin/grades/distribution-edit-2.tcl	8 Apr 2006 21:05:28 -0000	1.1.1.1.4.2
@@ -59,7 +59,7 @@
     } else { 
         lappend without_grade $id
     }
-    set aweight [lc_numeric %.2f $weights($id)]
+    set aweight [format %.2f $weights($id)]
     set apoints [format %0.2f [expr ($weights($id)*$grade_weight)/100.00]]
     set rel_weight [format %0.2f [expr ($counter*$aweight/100.00)]]