Index: openacs-4/contrib/packages/survey/www/process-response.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/survey/www/Attic/process-response.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/contrib/packages/survey/www/process-response.tcl	23 Feb 2004 13:23:04 -0000	1.4
+++ openacs-4/contrib/packages/survey/www/process-response.tcl	11 Mar 2004 15:24:17 -0000	1.5
@@ -200,7 +200,7 @@
 		    # insert value into db
 		    db_dml ignore "update $table_name set $column_name=:response_value where $key_name=:user_id"
 		    if {![db_resultrows]} {
-			db_dml insert "insert into $table_name ($key_name,$column_name) values (:user_id,_response_value)"
+			db_dml insert "insert into $table_name ($key_name,$column_name) values (:user_id,:response_value)"
 		    }
 		} else {
 		    if {$action_type=="tcl"} {