Index: openacs-4/packages/lars-blogger/www/admin/drafts.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/admin/Attic/drafts.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/lars-blogger/www/admin/drafts.tcl 14 Sep 2002 22:05:25 -0000 1.3 +++ openacs-4/packages/lars-blogger/www/admin/drafts.tcl 16 Sep 2002 13:01:34 -0000 1.4 @@ -15,13 +15,15 @@ set return_url "[ad_conn url][ad_decode [ad_conn query] "" "" "?[ad_conn query]"]" set edit_url "[ad_conn package_url]admin/entry-edit?[export_vars { entry_id return_url }]" set delete_url "[ad_conn package_url]admin/entry-delete?[export_vars { entry_id return_url }]" - set preview_url "[ad_conn package_url]admin/entry-preview?[export_vars { entry_id return_url }]" + set preview_url "[ad_conn package_url]one-entry?[export_vars { entry_id return_url }]" set publish_url "[ad_conn package_url]admin/entry-publish?[export_vars { entry_id return_url }]" set content [ns_adp_parse -string $content] } set entry_add_url "entry-edit" +set arrow_url "[ad_conn package_url]graphics/arrow-box.gif" + set header_background_color [lars_blog_header_background_color] ad_return_template