Index: openacs-4/packages/lars-blogger/www/admin/entry-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/admin/Attic/entry-delete.tcl,v diff -u -N --- openacs-4/packages/lars-blogger/www/admin/entry-delete.tcl 19 Aug 2002 21:52:59 -0000 1.1 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,12 +0,0 @@ -ad_page_contract {} { - entry_id:integer - {return_url ""} -} - -db_dml delete { - update pinds_blog_entries - set deleted_p = 't' - where entry_id = :entry_id -} - -ad_returnredirect $return_url \ No newline at end of file