Index: openacs-4/packages/simple-survey/tcl/survsimp-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/tcl/survsimp-procs.tcl,v
diff -u -N -r1.10 -r1.11
--- openacs-4/packages/simple-survey/tcl/survsimp-procs.tcl	9 May 2018 15:33:33 -0000	1.10
+++ openacs-4/packages/simple-survey/tcl/survsimp-procs.tcl	14 Sep 2018 18:18:49 -0000	1.11
@@ -379,7 +379,7 @@
 
 ns_share ad_new_stuff_module_list
 
-if { ![info exists ad_new_stuff_module_list] || [util_search_list_of_lists $ad_new_stuff_module_list "Surveys" 0] == -1 } {
+if { ![info exists ad_new_stuff_module_list] || [lsearch -index 0 $ad_new_stuff_module_list "Surveys" 0] == -1 } {
     lappend ad_new_stuff_module_list [list "Surveys" ad_survsimp_new_stuff]
 }