Index: openacs-4/packages/simple-survey/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/index.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/simple-survey/www/index.tcl	25 Feb 2002 20:27:41 -0000	1.2
+++ openacs-4/packages/simple-survey/www/index.tcl	29 Mar 2002 17:32:03 -0000	1.3
@@ -15,7 +15,7 @@
 
 set package_id [ad_conn package_id]
 
-set context_bar [ad_context_bar_ws_or_index "Surveys"]
+set context_bar [list "Surveys"]
 
 set user_id [ad_maybe_redirect_for_registration]
 
Index: openacs-4/packages/simple-survey/www/master.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/Attic/master.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/simple-survey/www/master.adp	25 Feb 2002 20:27:41 -0000	1.2
+++ openacs-4/packages/simple-survey/www/master.adp	29 Mar 2002 17:32:03 -0000	1.3
@@ -1,6 +1,8 @@
 <master>
 <property name=title>@title@</property>
 <h2>@title@</h2>
-@context_bar@
+ <if @context_bar@ not nil>
+  <%= [eval ad_context_bar $context_bar] %>
+ </if>
 <hr><p>
 <slave>
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.3 -r1.4
--- openacs-4/packages/simple-survey/www/one.tcl	15 Mar 2002 05:42:09 -0000	1.3
+++ openacs-4/packages/simple-survey/www/one.tcl	29 Mar 2002 17:32:03 -0000	1.4
@@ -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 [ad_context_bar_ws_or_index [list "./" "Surveys"] "$name"]
+set context_bar [list [list "./" "Surveys"] "$name"]
 
 set num_responses [db_string responses_count {
     select count(response_id)