Index: openacs-4/packages/assessment/lib/session.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/session.tcl,v diff -u -r1.6.2.1 -r1.6.2.2 --- openacs-4/packages/assessment/lib/session.tcl 7 Sep 2008 21:53:45 -0000 1.6.2.1 +++ openacs-4/packages/assessment/lib/session.tcl 13 Sep 2008 09:07:18 -0000 1.6.2.2 @@ -57,7 +57,7 @@ if {$session_finish ne ""} { set session_score [db_string get_session_score "" -default ""] set assessment_score [db_string get_max_points "" -default ""] - set max_time_to_complete [as::assessment::pretty_time -seconds $assessment_data(max_time_to_complete)] + set max_time_to_complete "" if {$session_score ne "" && $assessment_score ne "" && $assessment_score > 0} { set percent_score "[format "%3.2f" [expr {$session_score / ($assessment_score + 0.0) * 100}]]%" } else {