Index: openacs-4/packages/lars-blogger/www/admin/recently-published.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/admin/Attic/recently-published.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/lars-blogger/www/admin/recently-published.tcl 19 Aug 2002 21:52:59 -0000 1.1 +++ openacs-4/packages/lars-blogger/www/admin/recently-published.tcl 14 Sep 2002 16:40:35 -0000 1.2 @@ -11,9 +11,10 @@ set context_bar [ad_context_bar $page_title] -db_multirow entries entries { *SQL* } { +db_multirow -extend { edit_url preview_url } entries entries { *SQL* } { 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 -url { entry_id return_url }]" + set edit_url "[ad_conn package_url]admin/entry-edit?[export_vars { entry_id return_url }]" + set preview_url "[ad_conn package_url]admin/entry-preview?[export_vars { entry_id return_url }]" } ad_return_template