Index: openacs-4/contrib/packages/survey/www/admin/import-responses.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/survey/www/admin/Attic/import-responses.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/contrib/packages/survey/www/admin/import-responses.tcl	14 Feb 2004 19:57:59 -0000	1.2
+++ openacs-4/contrib/packages/survey/www/admin/import-responses.tcl	16 Mar 2005 12:26:31 -0000	1.3
@@ -32,7 +32,7 @@
     ad_script_abort
 }
 set survey_name $survey_info(name)
-set context_bar [ad_context_bar [list "one?[export_url_vars survey_id]" $survey_info(name)] "[_ survey.Import_responses]"]
+set context [list [list "one?[export_url_vars survey_id]" $survey_info(name)] [_ survey.Import_responses]]
 
 if {[info exists csvfile(tmpfile)]} {
     # preserve the file for future use