Index: openacs-4/packages/lars-blogger/www/entry-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/entry-chunk.tcl,v
diff -u -r1.3.2.1 -r1.3.2.2
--- openacs-4/packages/lars-blogger/www/entry-chunk.tcl	13 Mar 2003 14:30:31 -0000	1.3.2.1
+++ openacs-4/packages/lars-blogger/www/entry-chunk.tcl	13 Mar 2003 17:05:51 -0000	1.3.2.2
@@ -23,15 +23,10 @@
 
 set general_comments_package_url [general_comments_package_url]
 
-set show_poster_p [ad_parameter "ShowPosterP" "" "1"]
+set show_poster_p [parameter::get -package_id $package_id -parameter "ShowPosterP" -default "1"]
 
-set blog(title) [ad_quotehtml $blog(title)]
+lars_blogger::entry::htmlify -array blog
 
-# LARS:
-# Not sure we should do the ns_adp_parse thing here, but heck, why not
-# It should be safe, given the security checks
-set blog(content) [ns_adp_parse -string [ad_html_text_convert -from $blog(content_format) -to "text/html" $blog(content)]]
-
 set entry_id $blog(entry_id)
 
 set blog(edit_url) "${package_url}admin/entry-edit?[export_vars { entry_id return_url }]"
@@ -53,4 +48,4 @@
     set comments_html [general_comments_get_comments -print_content_p 1 $entry_id]
 }
 
-ad_return_template
\ No newline at end of file
+ad_return_template