Index: openacs-4/packages/lars-blogger/www/one-entry.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/one-entry.tcl,v diff -u -r1.5 -r1.5.2.1 --- openacs-4/packages/lars-blogger/www/one-entry.tcl 14 Sep 2002 22:05:25 -0000 1.5 +++ openacs-4/packages/lars-blogger/www/one-entry.tcl 13 Mar 2003 17:05:51 -0000 1.5.2.1 @@ -2,13 +2,10 @@ entry_id:integer {return_url ""} } -properties { - context_bar - title_html - content_html - draft_p_checked - entry_date_html - form_export_vars - return_url + context + blog:onerow + header_background_color + page_title } set package_id [ad_conn package_id] @@ -19,14 +16,12 @@ set return_url "[ad_conn url]?[ad_conn query]" } -set show_poster_p [ad_parameter "ShowPosterP" "" "1"] - lars_blogger::entry::get -entry_id $entry_id -array blog set page_title $blog(title) -set context_bar [ad_context_bar $page_title] +set context [list $page_title] set header_background_color [lars_blog_header_background_color] -ad_return_template \ No newline at end of file +ad_return_template