Index: openacs-4/packages/simple-survey/www/process-response.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/process-response.tcl,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/simple-survey/www/process-response.tcl	10 Sep 2002 22:23:23 -0000	1.5
+++ openacs-4/packages/simple-survey/www/process-response.tcl	1 Mar 2005 00:01:42 -0000	1.6
@@ -125,7 +125,7 @@
 
 ad_require_permission $survey_id survsimp_take_survey
 
-set user_id [ad_verify_and_get_user_id]
+set user_id [ad_conn user_id]
 
 # Do the inserts.