Index: openacs-4/packages/assessment/www/asm-admin/results-users.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/results-users.tcl,v
diff -u -r1.12.2.1 -r1.12.2.2
--- openacs-4/packages/assessment/www/asm-admin/results-users.tcl 11 Sep 2008 11:59:07 -0000 1.12.2.1
+++ openacs-4/packages/assessment/www/asm-admin/results-users.tcl 8 Oct 2008 15:22:44 -0000 1.12.2.2
@@ -84,7 +84,7 @@
-elements {
session_id {
label {[_ assessment.View_Results]}
- display_template {View}
+ display_template {View}
}
subject_name {
label {[_ assessment.Name]}
@@ -135,12 +135,14 @@
set subject_url [acs_community_member_url -user_id $subject_id]
}
set result_url [export_vars -base "results-session" {session_id}]
- if {$completed_datetime eq ""} {
- set status "Incomplete"
+ if { $completed_datetime eq "" && $session_id eq "" } {
+ set status [_ assessment.Not_Taken]
+ } elseif { $completed_datetime eq "" && $session_id ne "" } {
+ set status [_ assessment.Incomplete]
set session_score ""
set assessment_score ""
} else {
- set status "Complete"
+ set status [_ assessment.Complete]
set session_score [db_string get_session_score {} -default ""]
set assessment_score [db_string get_max_points {}]
if { $assessment_score > 0 } {