Index: openacs-4/packages/assessment/www/assessment.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/assessment.adp,v diff -u -r1.4 -r1.5 --- openacs-4/packages/assessment/www/assessment.adp 23 Sep 2004 14:20:56 -0000 1.4 +++ openacs-4/packages/assessment/www/assessment.adp 24 Sep 2004 13:27:55 -0000 1.5 @@ -14,7 +14,7 @@
   - Items

+ #assessment.Items#

@@ -36,7 +36,7 @@
#assessment.Question# @items.rownum@:@items.title@
-
+

Index: openacs-4/packages/assessment/www/session.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/session.adp,v diff -u -r1.4 -r1.5 --- openacs-4/packages/assessment/www/session.adp 24 Sep 2004 11:21:33 -0000 1.4 +++ openacs-4/packages/assessment/www/session.adp 24 Sep 2004 13:27:55 -0000 1.5 @@ -20,21 +20,21 @@
- + - + #assessment.Score# +
Question @items.rownum@  (@items.maxscore@ points)
#assessment.Question# @items.rownum@  (@items.maxscore@ #assessment.points#)
@items.title@
- Student response: + #assessment.Student_response#: @items.choice_html;noquote@
- Score:@items.score@ / @items.maxscore@ - (Question not answered.)
Feedback: @items.feedback_text@
@items.score@ / @items.maxscore@ + (#assessment.Question_not_answered#.)
#assessment.Feedback#: @items.feedback_text@


-Total score: @session_score@ / @assessment_score@ +#assessment.Total_score#: @session_score@ / @assessment_score@ Index: openacs-4/packages/assessment/www/session.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/session.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/assessment/www/session.tcl 24 Sep 2004 11:22:02 -0000 1.5 +++ openacs-4/packages/assessment/www/session.tcl 24 Sep 2004 13:27:55 -0000 1.6 @@ -29,7 +29,7 @@ set maxscore $itemmaxscore set score 0 set item_correct 1 - set choice_html {} + set choice_html "
Student ResponseCorrect AnswerAnswer Choices
" db_foreach choices {} { if {[string length "$choice_id_answer"]} {set notanswered 0} if {$correct_answer_p == {t}} { set correct_answer_bool 1 } else { set correct_answer_bool 0 } Index: openacs-4/packages/assessment/www/sessions.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/sessions.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/assessment/www/sessions.tcl 23 Sep 2004 18:51:05 -0000 1.4 +++ openacs-4/packages/assessment/www/sessions.tcl 24 Sep 2004 13:27:55 -0000 1.5 @@ -18,11 +18,11 @@ -key sessions_id \ -elements { session_id { - label {Session} + label {[_ assessment.Session]} link_url_eval {[export_vars -base "session" {session_id}]} } subject_name { - label {Subject Name} + label {[_ assessment.Subject_Name]} link_url_eval {[acs_community_member_url -user_id $subject_id]} } @@ -31,7 +31,7 @@ link_url_eval {[export_vars -base "assessment" {assessment_id}]} } completed_datetime { - label {Finnish Time} + label {[_ assessment.Finish_Time]} html {nowrap} } } \
[_ assessment.Student_Response][_ assessment.Correct_Answer][_ assessment.Answer_Choices]