Index: openacs-4/packages/assessment/www/asm-admin/item-edit-mc-choices-swap.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/item-edit-mc-choices-swap.tcl,v
diff -u -N -r1.6 -r1.7
--- openacs-4/packages/assessment/www/asm-admin/item-edit-mc-choices-swap.tcl	7 Aug 2017 23:48:04 -0000	1.6
+++ openacs-4/packages/assessment/www/asm-admin/item-edit-mc-choices-swap.tcl	20 Jan 2018 22:38:28 -0000	1.7
@@ -32,12 +32,18 @@
     set new_assessment_rev_id [as::assessment::new_revision -assessment_id $assessment_id]
     set new_section_id [as::section::new_revision -section_id $section_id -assessment_id $assessment_id]
     set new_item_id [as::item::new_revision -as_item_id $as_item_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
+    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
+
     set new_mc_id [as::item_type_mc::new_revision -as_item_type_id $mc_id]
     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
+        -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_in_item {}
     db_dml swap_choices {}
@@ -49,6 +55,7 @@
 set section_id $new_section_id
 set as_item_id $new_item_id
 ad_returnredirect [export_vars -base item-edit {assessment_id section_id as_item_id}]
+ad_script_abort
 
 # Local variables:
 #    mode: tcl