Index: openacs-4/packages/survey/www/admin/question-required-toggle.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/question-required-toggle.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/survey/www/admin/question-required-toggle.tcl 27 Jun 2015 20:46:15 -0000 1.5 +++ openacs-4/packages/survey/www/admin/question-required-toggle.tcl 3 Sep 2024 15:37:54 -0000 1.6 @@ -26,7 +26,13 @@ and question_id = :question_id" db_release_unused_handles -get_survey_info -section_id $section_id +survey::get_info -section_id $section_id set survey_id $survey_info(survey_id) ad_returnredirect [export_vars -base one {survey_id}] + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: