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.2 -r1.3 --- openacs-4/packages/survey/www/admin/modify-responses.tcl 12 Mar 2003 01:05:52 -0000 1.2 +++ openacs-4/packages/survey/www/admin/modify-responses.tcl 6 Nov 2013 07:33:54 -0000 1.3 @@ -15,7 +15,7 @@ } -ad_require_permission $section_id survey_modify_question +permission::require_permission -object_id $section_id -privilege survey_modify_question get_survey_info -section_id $section_id set survey_id $survey_info(survey_id) @@ -68,14 +68,14 @@ doc_return 200 text/html "[ad_header "[_ survey.Modify_Responses]"]