Index: openacs-4/packages/assessment/www/asm-admin/action-params.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/action-params.tcl,v diff -u -r1.5.2.3 -r1.5.2.4 --- openacs-4/packages/assessment/www/asm-admin/action-params.tcl 26 Jul 2005 13:41:25 -0000 1.5.2.3 +++ openacs-4/packages/assessment/www/asm-admin/action-params.tcl 1 Aug 2005 11:52:14 -0000 1.5.2.4 @@ -76,9 +76,8 @@ } } else { set choices [db_list_of_lists choices_param $query] - } - - set parameter [list [list param_$parameter_id:text(select),optional [list label $varname] [list options $choices] [list help_text $description]]] + } + set parameter [list [list param_$parameter_id:text(select),optional [list label $varname] [list html [list style "width:200px"]] [list options $choices] [list help_text $description]]] ad_form -extend -name get_params -form $parameter } Index: openacs-4/packages/assessment/www/asm-admin/action-params.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/action-params.xql,v diff -u -r1.4.2.2 -r1.4.2.3 --- openacs-4/packages/assessment/www/asm-admin/action-params.xql 27 Jul 2005 21:58:58 -0000 1.4.2.2 +++ openacs-4/packages/assessment/www/asm-admin/action-params.xql 1 Aug 2005 11:52:14 -0000 1.4.2.3 @@ -32,15 +32,7 @@ select cri.title, cri.item_id as as_item_id from as_item_section_map sm, cr_revisions cri - where sm.as_item_id = cri.revision_id and sm.section_id in ( - select s.section_id - from as_sections s, cr_revisions cr, cr_items ci, - as_assessment_section_map asm,as_item_section_map sm - where ci.item_id = cr.item_id - and cr.revision_id = s.section_id - and s.section_id = asm.section_id - and asm.assessment_id = :new_assessment_revision) - + where sm.as_item_id = cri.revision_id and sm.section_id = :section_id 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 -r1.8.2.5 -r1.8.2.6 --- openacs-4/packages/assessment/www/asm-admin/item-edit-mc.tcl 29 Jul 2005 14:52:19 -0000 1.8.2.5 +++ openacs-4/packages/assessment/www/asm-admin/item-edit-mc.tcl 1 Aug 2005 11:52:14 -0000 1.8.2.6 @@ -86,7 +86,7 @@ } else { append ad_form_code "\{correct.$choice_id:text(checkbox),optional \{label \"[_ assessment.Correct_Answer_Choice] $count\"\} \{options \$correct_options\} \{help_text \"[_ assessment.Correct_Answer_help]\"\}\}\n" } - lappend validate_list "correct.$choice_id {\$count_correct > 0} \"\[_ assessment.one_correct_choice_req\]\"" + # lappend validate_list "correct.$choice_id {\$count_correct > 0} \"\[_ assessment.one_correct_choice_req\]\"" } }