Index: openacs-4/packages/evaluation/lib/student-grades-report-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/lib/student-grades-report-chunk.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/evaluation/lib/student-grades-report-chunk.tcl	10 Sep 2004 19:16:28 -0000	1.5
+++ openacs-4/packages/evaluation/lib/student-grades-report-chunk.tcl	24 Sep 2004 21:23:12 -0000	1.6
@@ -99,10 +99,10 @@
 
     if { ![empty_string_p $grade] } {
 
-	set grade [format %.2f [lc_numeric $grade]]
-	set over_weight "[format %.2f [lc_numeric $net_grade]]/"
+	set grade [lc_numeric $grade]
+	set over_weight "[lc_numeric $net_grade]/"
 	set total_grade [expr $total_grade + $net_grade]
-	set net_grade [format %.2f [lc_numeric $net_grade]]
+	set net_grade [lc_numeric $net_grade]
 	set task_status "[_ evaluation.Evaluated_]"
     } else {
 	set net_grade "[_ evaluation.na_]"
@@ -117,7 +117,7 @@
 
     set max_grade [expr $task_weight + $max_grade] 
 
-    set task_weight "${over_weight}[format %.2f [lc_numeric $task_weight]]"
+    set task_weight "${over_weight}[lc_numeric $task_weight]"
     
     set group_id [db_string get_group_id { *SQL* }]
     if { $number_of_members > 1 } {
@@ -133,6 +133,6 @@
     
 }
 
-set total_grade [format %.2f [lc_numeric [expr $total_grade]]]
-set max_grade [format %.2f [lc_numeric $max_grade]]
-set grade_weight [format %.2f [lc_numeric $grade_weight]]
\ No newline at end of file
+set total_grade [lc_numeric [expr $total_grade]]
+set max_grade [lc_numeric $max_grade]
+set grade_weight [lc_numeric $grade_weight]
\ No newline at end of file