Index: openacs-4/contrib/packages/survey/www/admin/question-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/survey/www/admin/Attic/question-add.tcl,v
diff -u -r1.2 -r1.2.2.1
--- openacs-4/contrib/packages/survey/www/admin/question-add.tcl	14 Feb 2004 19:57:59 -0000	1.2
+++ openacs-4/contrib/packages/survey/www/admin/question-add.tcl	21 Oct 2004 07:31:24 -0000	1.2.2.1
@@ -41,6 +41,9 @@
         	     { "[_ survey.lt_Multiple_Choice_Drop_]" "select" }
         	     { "[_ survey.lt_Multiple_Choice_Radio]" "radio" }
 		     { "[_ survey.lt_Multiple_Choice_Check]" "checkbox" }
+        	     { "[_ survey.lt_Multiple_Choice_Drop_text]" "select_text" }
+        	     { "[_ survey.lt_Multiple_Choice_Radio_text]" "radio_text" }
+		     { "[_ survey.lt_Multiple_Choice_Check_text]" "checkbox_text" }
 		     { "[_ survey.Date]" "date" }
 		     { "[_ survey.File_Attachment]" "upload_file" } } } }
 }	    
Index: openacs-4/contrib/packages/survey/www/admin/question-modify.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/survey/www/admin/Attic/question-modify.tcl,v
diff -u -r1.3.2.1 -r1.3.2.2
--- openacs-4/contrib/packages/survey/www/admin/question-modify.tcl	2 Sep 2004 15:17:48 -0000	1.3.2.1
+++ openacs-4/contrib/packages/survey/www/admin/question-modify.tcl	21 Oct 2004 07:31:24 -0000	1.3.2.2
@@ -74,7 +74,7 @@
 
 if {($presentation_type=="checkbox" || $presentation_type=="select" || $presentation_type=="radio") && $abstract_data_type != "boolean" && $block_p=="f"} {
     ad_form -extend -name modify_question -form {
-	{presentation_type:text(radio) {options {{"[_ survey.Radio_buttons]" radio} {"[_ survey.Checkboxes]" checkbox} {"[_ survey.Select_box]" select}}} {value $presentation_type} {label "[_ survey.Presentation]"}}
+	{presentation_type:text(radio) {options {{"[_ survey.Radio_buttons]" radio} {"[_ survey.Checkboxes]" checkbox} {"[_ survey.Select_box]" select} {"[_ survey.Radio_buttons_text]" radio_text} {"[_ survey.Checkboxes_text]" checkbox_text} {"[_ survey.Select_box_text]" select_text}}} {value $presentation_type} {label "[_ survey.Presentation]"}}
     }
     set valid_responses_list [db_list survey_question_valid_responses {}]
     set response_list ""