Index: openacs-4/packages/survey/www/admin/one.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/one.tcl,v diff -u -N -r1.7 -r1.8 --- openacs-4/packages/survey/www/admin/one.tcl 21 Jan 2005 17:24:28 -0000 1.7 +++ openacs-4/packages/survey/www/admin/one.tcl 26 Jan 2005 21:05:13 -0000 1.8 @@ -68,7 +68,7 @@ # Questions summary. # We need to get the questions for ALL sections. -set context $survey_info(name) +set context [list $survey_info(name)] db_multirow -extend { question_display } questions survey_questions "" {set question_display [survey_question_display $question_id]}