Index: openacs-4/packages/survey/www/admin/responses-export.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/responses-export.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/survey/www/admin/responses-export.tcl	13 Jan 2005 13:58:46 -0000	1.8
+++ openacs-4/packages/survey/www/admin/responses-export.tcl	21 Jan 2005 17:24:28 -0000	1.9
@@ -23,7 +23,7 @@
 ns_log notice "DAVEB: n_responses=$n_responses"
 if {$n_responses==0} {
     get_survey_info -survey_id $survey_id
-    set context_bar [ad_context_bar [list "one?[export_url_vars survey_id]" $survey_info(name)] "[_ survey.CSV_Export]"]
+    set context [list [list "one?[export_url_vars survey_id]" $survey_info(name)] "[_ survey.CSV_Export]"]
     ad_return_template "no-responses"
     return
 }