Index: openacs-4/www/templates/widgets/news.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/www/templates/widgets/Attic/news.tcl,v diff -u -r1.1.2.1 -r1.1.2.2 --- openacs-4/www/templates/widgets/news.tcl 1 Dec 2004 10:42:23 -0000 1.1.2.1 +++ openacs-4/www/templates/widgets/news.tcl 26 Aug 2008 23:29:42 -0000 1.1.2.2 @@ -8,15 +8,17 @@ news_items:multirow } -set n_news_items 6 +set n_news_items 4 set news_limit [expr $n_news_items + 1] set max_post_age_days 60 db_multirow news_items news_items_select " select item_id, publish_title, - pretty_publish_date + pretty_publish_date, + publish_body, + html_p from news_items_approved --where package_id = 43787 --where package_id = 3147 @@ -26,8 +28,14 @@ limit $news_limit " { regsub -all {/} $publish_title { / } publish_title + + if { !$html_p } { + set publish_body [ad_convert_to_html $publish_body] + } + } + #etp::get_page_attributes #etp::get_content_items -where $where -orderby $orderby \ -limit $news_limit \