Index: openacs.org-dev/packages/simple-survey/www/one.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs.org-dev/packages/simple-survey/www/one.tcl,v diff -u -r1.1.1.1 -r1.1.1.2 --- openacs.org-dev/packages/simple-survey/www/one.tcl 9 Jul 2002 17:35:12 -0000 1.1.1.1 +++ openacs.org-dev/packages/simple-survey/www/one.tcl 8 Oct 2002 15:47:25 -0000 1.1.1.2 @@ -6,7 +6,7 @@ @author philg@mit.edu @author nstrug@arsdigita.com - @date 28th September 2000 + @creation-date 28th September 2000 @cvs-id $Id$ } { @@ -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 [list [list "./" "Surveys"] "$name"] +set context [list [list "./" "Surveys"] "$name"] set num_responses [db_string responses_count { select count(response_id)