Index: openacs-4/packages/assessment/lib/item-show-mc.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/item-show-mc.tcl,v diff -u -r1.7.2.3 -r1.7.2.4 --- openacs-4/packages/assessment/lib/item-show-mc.tcl 10 Mar 2006 11:29:36 -0000 1.7.2.3 +++ openacs-4/packages/assessment/lib/item-show-mc.tcl 11 Mar 2006 19:54:10 -0000 1.7.2.4 @@ -22,7 +22,6 @@ foreach one_choice $choices { util_unlist $one_choice choice_id title correct_answer_p feedback_text selected_p percent_score sort_order fixed_position answer_value content_rev_id content_filename content_name incr count - regsub -all \\$ $title {\\$ } title set options "" if {$count < $total} { append options " \\\"[_" @@ -33,9 +32,9 @@ append options " \\\"[_" if {$correct_answer_p == "t"} { - append ad_form_code "\{infotxt.$choice_id:text(inform) \{label \"[_ assessment.Choice] $count\"\} \{value \" $title$options\"\}\}\n" + append ad_form_code "\{infotxt.$choice_id:text(inform) \{label \"[_ assessment.Choice] $count\"\} \{value \" \$title$options\"\}\}\n" } else { - append ad_form_code "\{infotxt.$choice_id:text(inform) \{label \"[_ assessment.Choice] $count\"\} \{value \" $title$options\"\}\}\n" + append ad_form_code "\{infotxt.$choice_id:text(inform) \{label \"[_ assessment.Choice] $count\"\} \{value \" \$title$options\"\}\}\n" } if {![empty_string_p $content_rev_id]} {