Index: openacs-4/contrib/packages/survey/www/admin/question-add-3.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/survey/www/admin/Attic/question-add-3.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/contrib/packages/survey/www/admin/question-add-3.tcl	13 Jan 2005 13:54:40 -0000	1.3
+++ openacs-4/contrib/packages/survey/www/admin/question-add-3.tcl	25 Mar 2005 22:19:08 -0000	1.4
@@ -144,8 +144,9 @@
 	    # For questions where the user is selecting a canned response, insert
 	    # the canned responses into survey_question_choices by parsing the valid_responses
 	    # field.
-	    
-            if { $presentation_type == "checkbox" || $presentation_type == "radio" || $presentation_type == "select" } {
+
+	    # SB: also check for the additional presentation types: checkbox_test, radio_text and select_text 
+	    if {[string match checkbox* $presentation_type] || [string match radio* $presentation_type] || [string match select* $presentation_type] } {
                 if { $abstract_data_type == "choice" } {
 	            set responses [split $valid_responses "\n"]
 	            set count 0