Index: openacs-4/packages/evaluation/lib/evaluations-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/lib/evaluations-chunk.tcl,v
diff -u -r1.16.2.1 -r1.16.2.2
--- openacs-4/packages/evaluation/lib/evaluations-chunk.tcl 31 May 2005 23:13:09 -0000 1.16.2.1
+++ openacs-4/packages/evaluation/lib/evaluations-chunk.tcl 24 Apr 2006 17:53:24 -0000 1.16.2.2
@@ -177,7 +177,7 @@
set category_weight [expr $category_weight + $task_weight]
set grade_url [export_vars -base "${base_url}admin/evaluations/student-list" { grade_id task_id return_url }]
set max_weight [format %0.2f [expr $max_weight + $task_weight]]
- set task_weight [lc_numeric $task_weight]
+ set task_weight [format %0.2f $task_weight]
set max_grade [expr $max_grade + $perfect_score]
set max_grade_label "
$max_grade pts."
set solution_label "[_ evaluation-portlet.weight_possible_of_grade_] $low_name )"
Index: openacs-4/packages/evaluation-portlet/lib/evaluations-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation-portlet/lib/evaluations-chunk.tcl,v
diff -u -r1.12.2.4 -r1.12.2.5
--- openacs-4/packages/evaluation-portlet/lib/evaluations-chunk.tcl 8 Apr 2006 20:20:50 -0000 1.12.2.4
+++ openacs-4/packages/evaluation-portlet/lib/evaluations-chunk.tcl 24 Apr 2006 17:54:02 -0000 1.12.2.5
@@ -177,7 +177,7 @@
set category_weight [expr $category_weight + $task_weight]
set grade_url [export_vars -base "${base_url}admin/evaluations/student-list" { grade_id task_id return_url }]
set max_weight [format %0.2f [expr $max_weight + $task_weight]]
- set task_weight [lc_numeric $task_weight]
+ set task_weight [format %0.2f $task_weight]
set max_grade [expr $max_grade + $perfect_score]
set max_grade_label "$max_grade pts."
set solution_label "[_ evaluation-portlet.weight_possible_of_grade_] $low_name )"