Index: openacs-4/packages/assessment/tcl/as-item-data-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-item-data-procs.tcl,v diff -u -N -r1.11 -r1.12 --- openacs-4/packages/assessment/tcl/as-item-data-procs.tcl 12 Jun 2006 03:02:38 -0000 1.11 +++ openacs-4/packages/assessment/tcl/as-item-data-procs.tcl 13 Dec 2006 19:10:47 -0000 1.12 @@ -44,6 +44,8 @@ db_transaction { if {[db_0or1row old_item_id {}]} { if {$allow_overwrite_p == "f"} { + set as_item_data_id $latest_revision + set transaction_successful_p 1 return } set new_p 0