Index: openacs-4/packages/cms/www/modules/items/custom/image/attributes-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/cms/www/modules/items/custom/image/attributes-edit.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/cms/www/modules/items/custom/image/attributes-edit.tcl 27 May 2001 04:39:19 -0000 1.5 +++ openacs-4/packages/cms/www/modules/items/custom/image/attributes-edit.tcl 16 Aug 2002 00:32:08 -0000 1.6 @@ -12,22 +12,8 @@ revision_id -datatype integer -widget hidden } -template::query get_item_info item_info onerow " - select - i.name, i.latest_revision, r.title - from - cr_items i, cr_revisions r - where - i.item_id = :item_id - and - i.item_id = r.item_id - and - i.latest_revision = r.revision_id -" +db_1row get_item_info "" -template::util::array_to_vars item_info - - content::add_attribute_elements image image $latest_revision element set_properties image mime_type -widget hidden @@ -51,14 +37,7 @@ set ip_address [ns_conn peeraddr] db_transaction { - template::query get_latest latest_revision onevalue " - select - latest_revision - from - cr_items - where - item_id = :item_id - " + set latest_revision [db_string get_latest ""] # create the revision if { [catch {db_exec_plsql " @@ -73,14 +52,7 @@ end;" } revision_id] } { # check for dupe submit - template::query get_clicks clicks onevalue " - select - count(1) - from - cr_revisions - where - revision_id = :revision_id - " + set clicks [db_string get_clicks ""] db_abort_transaction