Index: openacs-4/packages/simple-survey/www/admin/responses.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/responses.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/simple-survey/www/admin/responses.tcl	25 Feb 2002 20:27:41 -0000	1.2
+++ openacs-4/packages/simple-survey/www/admin/responses.tcl	18 Mar 2002 16:58:06 -0000	1.3
@@ -159,7 +159,7 @@
     }
 }
 
-set context_bar [ad_context_bar_ws_or_index [list "./" "Simple Survey Admin"] \
+set context_bar [list [list "./" "Simple Survey Admin"] \
      [list "one?survey_id=$survey_id" "Administer Survey"] \
      "Responses"]