Index: openacs-4/packages/survey/www/admin/question-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/question-add.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/survey/www/admin/question-add.tcl	12 Mar 2003 01:05:52 -0000	1.4
+++ openacs-4/packages/survey/www/admin/question-add.tcl	21 Jan 2005 17:24:28 -0000	1.5
@@ -43,7 +43,7 @@
 
 get_survey_info -section_id $section_id
 set survey_id $survey_info(survey_id)
-set context_bar [ad_context_bar [list "one?[export_url_vars survey_id]" $survey_info(name)] "[_ survey.Add_A_Question]"]
+set context [list [list "one?[export_url_vars survey_id]" $survey_info(name)] "[_ survey.Add_A_Question]"]
 
 if {[ad_parameter allow_question_deactivation_p] == 1} {
     ad_form -extend -name create_question -form {