Index: openacs-4/packages/assessment/tcl/as-item-type-mc-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-item-type-mc-procs.tcl,v diff -u -N -r1.26.2.1 -r1.26.2.2 --- openacs-4/packages/assessment/tcl/as-item-type-mc-procs.tcl 10 Sep 2015 08:27:58 -0000 1.26.2.1 +++ openacs-4/packages/assessment/tcl/as-item-type-mc-procs.tcl 2 Jan 2016 21:57:46 -0000 1.26.2.2 @@ -701,7 +701,7 @@ 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] # HAM : querried the mc_id for the given choice id - set mc_id [db_string "get_mc_id" "select mc_id from as_item_choices where choice_id=:choice_id"] + set mc_id [db_string get_mc_id {select mc_id from as_item_choices where choice_id=:choice_id}] # *********** set new_mc_id [as::item_type_mc::new_revision -as_item_type_id $mc_id -with_choices_p f] as::section::update_section_in_assessment \