Index: openacs-4/packages/assessment/tcl/as-qti-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-qti-procs.tcl,v
diff -u -N -r1.25 -r1.26
--- openacs-4/packages/assessment/tcl/as-qti-procs.tcl	15 Feb 2005 18:07:50 -0000	1.25
+++ openacs-4/packages/assessment/tcl/as-qti-procs.tcl	17 Feb 2005 10:52:20 -0000	1.26
@@ -87,7 +87,7 @@
 								
 				set itemfeedbacknodes [$root selectNodes {/questestinterop/assessment/section/item/itemfeedback}]
 				if { [llength $itemfeedbacknodes] >0} {
-				    as_assessments__show_feedback "all"
+				    set as_assessments__show_feedback "all"
 				}
 				set resprocessNodes [$root selectNodes {/questestinterop/assessment/section/item/resprocessing}]
 				set as_assessments__survey_p {f}