Index: openacs-4/packages/survey/www/admin/modify-responses.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/modify-responses.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/survey/www/admin/modify-responses.tcl 6 Nov 2013 07:33:54 -0000 1.3 +++ openacs-4/packages/survey/www/admin/modify-responses.tcl 27 Oct 2014 16:41:56 -0000 1.4 @@ -10,8 +10,8 @@ @cvs-id $Id$ } { - question_id:integer - section_id:integer + question_id:naturalnum,notnull + section_id:naturalnum,notnull } @@ -63,26 +63,24 @@ append table_html "\n" -db_release_unused_handles +set title [_ survey.Modify_Responses] +set context [list "one?[export_vars -url {survey_id}]" $survey_info(name)] [_ survey.lt_Modify_Question_Respo] -doc_return 200 text/html "[ad_header "[_ survey.Modify_Responses]"] -
+
+}] -[_ survey.Question]: $question_text --
- -[ad_footer] -" +ad_return_template generic