Index: openacs-4/packages/simple-survey/www/process-response.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/process-response.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/simple-survey/www/process-response.tcl	15 Jun 2001 00:45:42 -0000	1.2
+++ openacs-4/packages/simple-survey/www/process-response.tcl	25 Feb 2002 20:27:41 -0000	1.3
@@ -331,7 +331,7 @@
 	    ad_returnredirect "$return_url"
 	    return
 	} else {
-#	    set context_bar [list [list "index.tcl" "Surveys"] "One Survey"]	    
+            set context_bar [ad_context_bar_ws_or_index [list "./" "Surveys"] "Response Submitted for $survey_name"]
 	    ad_return_template
 	}
     }
@@ -369,7 +369,8 @@
 	    ad_returnredirect "$return_url"
 	    return
 	} else {
-#	    set context_bar [list [list "index.tcl" "Surveys"] "One Survey"]	    
+            set context_bar [ad_context_bar_ws_or_index [list "./" "Surveys"] "Response Submitted for $survey_name"]
+
 	    ad_return_template
 	}	
     }