Index: openacs-4/packages/news/www/item-create.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/item-create.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/news/www/item-create.tcl	24 Feb 2009 23:11:02 -0000	1.7
+++ openacs-4/packages/news/www/item-create.tcl	22 Dec 2009 22:24:02 -0000	1.8
@@ -12,17 +12,11 @@
 } {
     {publish_title {}}
     {publish_lead {}}
-    {publish_body:allhtml {}}
-    {html_p {f}}
+    {publish_body:html {}}
+    {publish_body.format {}}
     {publish_date_ansi {now}}
     {archive_date_ansi {}}
     {permanent_p {}}
-} -properties {
-    title:onevalue
-    context:onevalue
-    publish_date_select:onevalue
-    archive_date_select:onevalue
-    immediate_approve_p:onevalue
 }
 
 # Authorization by news_create
@@ -63,16 +57,12 @@
         {label "[_ news.Lead]"}
         {html {cols 60 rows 3}}
         {value $publish_lead}}
-    {publish_body:text(textarea),optional
+    {publish_body:text(richtext),optional
         {label "[_ news.Body]"}
         {html {cols 60 rows 20}}
-        {value $publish_body}}
+        {value "[list $publish_body ${publish_body.format}]"}}
     {text_file:text(file),optional
         {label "[_ news.or_upload_text_file]"}}
-    {html_p:text(radio)
-        {label "[_ news.The_text_is_formatted_as]"}
-        {options {{"#news.Plain_text#" f} {"#news.HTML#" t}}}
-        {value $html_p}}
 }
 
 if { $immediate_approve_p } {