Index: openacs-4/packages/news/tcl/news-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/tcl/news-procs.tcl,v
diff -u -r1.27 -r1.27.4.1
--- openacs-4/packages/news/tcl/news-procs.tcl 21 Dec 2006 21:12:51 -0000 1.27
+++ openacs-4/packages/news/tcl/news-procs.tcl 29 Jul 2008 17:22:17 -0000 1.27.4.1
@@ -393,14 +393,14 @@
set html_content [ad_html_text_convert "$title\n\n$lead"]
if {$html_p} {
append new_content "\n\n[ad_html_text_convert -from text/html -to text/plain $body]"
- append html_content "
$body"
+ append html_content "
$body"
} else {
append new_content "\n\n$body"
- append html_content "
[ad_html_text_convert "$body"]"
+ append html_content "
[ad_html_text_convert "$body"]"
}
append new_content "\n\n[string repeat - 70]"
append new_content "\n\n[parameter::get_from_package_key -package_key acs-kernel -parameter SystemURL][news_util_get_url $news_package_id]]item?item_id=$item_id \n\n"
- append html_content "