Index: openacs-4/packages/assessment/lib/session-items.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/session-items.tcl,v diff -u -r1.19.2.4 -r1.19.2.5 --- openacs-4/packages/assessment/lib/session-items.tcl 16 Sep 2008 17:19:01 -0000 1.19.2.4 +++ openacs-4/packages/assessment/lib/session-items.tcl 14 Oct 2008 18:58:24 -0000 1.19.2.5 @@ -79,7 +79,7 @@ set correct_p 0 if {$show_feedback != "correct"} { if { $feedback_wrong ne "" } { - set feedback "$feedback_wrong" + set feedback "$feedback_wrong" set has_feedback_p 1 } else { set feedback "" @@ -89,7 +89,7 @@ set correct_p 1 if {$show_feedback ne "incorrect"} { if { $feedback_right ne "" } { - set feedback "$feedback_right" + set feedback "$feedback_right" set has_feedback_p 1 } else { set feedback "" @@ -110,7 +110,7 @@ set correct_p 0 if {$show_feedback != "correct"} { if { $feedback_wrong ne "" } { - set feedback "$feedback_wrong" + set feedback "$feedback_wrong" set has_feedback_p 1 } else { set feedback "" @@ -119,7 +119,7 @@ } else { if {$show_feedback != "incorrect"} { if { $feedback_right ne "" } { - set feedback "$feedback_right" + set feedback "$feedback_right" set has_feedback_p 1 } else { set feedback "" @@ -145,7 +145,7 @@ if { !$correct_p } { if {$show_feedback != "correct"} { if { $feedback_wrong ne "" } { - set feedback "$feedback_wrong" + set feedback "$feedback_wrong" set has_feedback_p 1 } else { set feedback "" @@ -154,7 +154,7 @@ } else { if {$show_feedback != "incorrect"} { if { $feedback_right ne "" } { - set feedback "$feedback_right" + set feedback "$feedback_right" set has_feedback_p 1 } else { set feedback ""