Index: openacs.org-dev/packages/news/www/preview.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/news/www/preview.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/news/www/preview.tcl	9 Jul 2002 17:35:09 -0000	1.1.1.1
+++ openacs.org-dev/packages/news/www/preview.tcl	8 Oct 2002 15:47:15 -0000	1.1.1.2
@@ -70,7 +70,7 @@
 }  -properties {
     
     title:onevalue
-    context_bar:onevalue
+    context:onevalue
     publish_title:onevalue
     publish_body:onevalue
     publish_location:onevalue
@@ -92,7 +92,7 @@
 set news_admin_p [ad_permission_p $package_id news_admin]
 
 set title "Preview $action"
-set context_bar [list $title]
+set context [list $title]
 
 
 # deal with Dates, granularity is 'day'
@@ -148,7 +148,7 @@
 set creator_link "<a href=\"/shared/community-member?user_id=$user_id\">$creator_name</a>"
 
 if { [info exists html_p] && [string match $html_p "f"] } {
-    set publish_body "<pre>[ad_quotehtml $publish_body]</pre>"
+    set publish_body "[ad_text_to_html $publish_body]"
 }
 
 ad_return_template