Index: openacs-4/packages/assessment/www/asm-admin/item-edit-mc.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/item-edit-mc.tcl,v diff -u -N -r1.9.2.1 -r1.9.2.2 --- openacs-4/packages/assessment/www/asm-admin/item-edit-mc.tcl 24 Jan 2007 20:15:30 -0000 1.9.2.1 +++ openacs-4/packages/assessment/www/asm-admin/item-edit-mc.tcl 5 Feb 2007 14:15:04 -0000 1.9.2.2 @@ -141,7 +141,10 @@ set as_item_id \[as::item::latest -as_item_id \$as_item_id -section_id \$new_section_id\] as::assessment::check::copy_item_checks -assessment_id \$assessment_id -section_id \$new_section_id -as_item_id \$as_item_id -new_item_id \$new_item_id - db_dml update_section_in_assessment {} + as::section::update_section_in_assessment\ + -old_section_id $section_id \ + -new_section_id $new_section_id \ + -new_assessment_rev_id $new_assessment_rev_id db_dml update_item_in_section {} db_dml update_item_type {} @@ -160,7 +163,7 @@ # add new choices foreach i \[lsort \[array names choice\]\] { - + if {\[string range \$i 0 0\] == \"_\" && !\[empty_string_p \$choice(\$i)\]} { incr count set new_choice_id \[as::item_choice::new -mc_id \$new_item_type_id \\