Index: openacs.org-dev/packages/cms/www/modules/items/content-add-1.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs.org-dev/packages/cms/www/modules/items/content-add-1.tcl,v diff -u -r1.1.1.1 -r1.1.1.2 --- openacs.org-dev/packages/cms/www/modules/items/content-add-1.tcl 9 Jul 2002 17:35:03 -0000 1.1.1.1 +++ openacs.org-dev/packages/cms/www/modules/items/content-add-1.tcl 8 Oct 2002 15:47:01 -0000 1.1.1.2 @@ -4,20 +4,8 @@ request create request set_param revision_id -datatype integer +db_1row get_revision "" -template::query get_revision one_revision onerow " - select - i.item_id, content_type, title as name, mime_type - from - cr_revisions r, cr_items i - where - i.item_id = r.item_id - and - r.revision_id = :revision_id -" - -template::util::array_to_vars one_revision - # permissions check - must have cm_write on the item content::check_access $item_id cm_write -user_id [User::getID]