Index: openacs-4/packages/survey/www/admin/modify-responses-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/admin/modify-responses-2.tcl,v
diff -u -N -r1.4 -r1.4.4.1
--- openacs-4/packages/survey/www/admin/modify-responses-2.tcl	27 Jun 2015 20:46:15 -0000	1.4
+++ openacs-4/packages/survey/www/admin/modify-responses-2.tcl	17 Dec 2019 16:28:44 -0000	1.4.4.1
@@ -44,7 +44,7 @@
 
 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}]