Index: openacs-4/packages/simple-survey/www/one.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/one.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/simple-survey/www/one.tcl	29 Mar 2002 17:32:03 -0000	1.4
+++ openacs-4/packages/simple-survey/www/one.tcl	5 Sep 2002 21:41:58 -0000	1.5
@@ -40,7 +40,7 @@
 db_1row survey_info "select name, description, single_response_p, single_editable_p, display_type
     from survsimp_surveys where survey_id = :survey_id"
 
-set context_bar [list [list "./" "Surveys"] "$name"]
+set context [list [list "./" "Surveys"] "$name"]
 
 set num_responses [db_string responses_count {
     select count(response_id)