Index: openacs-4/contrib/packages/survey/www/admin/survey-create.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/survey/www/admin/Attic/survey-create.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/survey/www/admin/survey-create.tcl	19 Sep 2003 16:48:05 -0000	1.1
+++ openacs-4/contrib/packages/survey/www/admin/survey-create.tcl	15 Feb 2004 13:56:12 -0000	1.2
@@ -33,23 +33,23 @@
 ad_form -name create_survey -form {
     survey_id:key
     {display_type:text(hidden)  {value $display_type}}
-    {name:text(text)            {label "Survey Name"} {html {size 55}}}
-    {description:text(textarea) {label "Description"} {html {rows 10 cols 40}}}
-    {desc_html:text(radio)      {label "The Above Description is"}
-	{options {{"Preformatted Text" "pre"}
-		  {"HTML" "html"} {"Plain Text" "plain"}}}
+    {name:text(text)            {label "[_ survey.Survey_Name_1]"} {html {size 55}}}
+    {description:text(textarea) {label "[_ survey.Description_1]"} {html {rows 10 cols 40}}}
+    {desc_html:text(radio)      {label "[_ survey.lt_The_Above_Description]"}
+	{options {{"[_ survey.Preformatted_Text]" "pre"}
+		  {"[_ survey.HTML]" "html"} {"[_ survey.Plain_Text]" "plain"}}}
 		{value "plain"}
     }
-    {public_p:text(radio)       {label "Public?"} {options {{Yes t} {No f}}} {value t}}
+    {public_p:text(radio)       {label "[_ survey.Public]"} {options {{Yes t} {No f}}} {value t}}
 } -validate { 
     {name {[string length $name] <= 4000}
-    "Survey Name must be 4000 characters or less"
+    "[_ survey.lt_Survey_Name_must_be_4]"
 }     {name {[string length $name] > 0}
-    "Please enter a name for the survey"
+    "[_ survey.lt_Please_enter_a_name_f]"
 }     {description {[string length $description] <= 4000}
-    "Survey Description must be 4000 characters or less"
+    "[_ survey.lt_Survey_Description_mu]"
 }     {description {[string length $description] > 0}
-    "Please enter a description for the survey"
+    "[_ survey.lt_Please_enter_a_descri]"
 }
     {survey_id {[db_string count_surveys ""] < 1} "oops"
     }
@@ -97,7 +97,7 @@
 
 # function to insert survey type-specific form html
 
-set context_bar [ad_context_bar "Create Survey"]
+set context_bar [ad_context_bar "[_ survey.Create_Survey]"]
 
 ad_return_template