Index: openacs-4/packages/assessment/lib/item-show-mc.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/item-show-mc.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/assessment/lib/item-show-mc.tcl	9 Feb 2005 10:42:50 -0000	1.4
+++ openacs-4/packages/assessment/lib/item-show-mc.tcl	18 Apr 2005 10:19:13 -0000	1.5
@@ -3,8 +3,10 @@
 
 db_1row item_type_data {}
 set boolean_options [list [list "[_ assessment.yes]" t] [list "[_ assessment.no]" f]]
+set actions [list [list "[_ acs-kernel.common_Edit]" edit] [list "[_ assessment.add_item_type_mc_existing]" existing]]
 
-ad_form -name item_show_mc -mode display -action item-edit-mc -export { assessment_id section_id as_item_id } -form {
+
+ad_form -name item_show_mc -mode display -action item-edit-mc -export { assessment_id section_id as_item_id } -actions $actions -form {
     {title:text {label "[_ assessment.Title]"} {html {size 80 maxlength 1000}} {value $title} {help_text "[_ assessment.oq_Title_help]"}}
     {increasing_p:text(select) {label "[_ assessment.Increasing]"} {options $boolean_options} {value $increasing_p} {help_text "[_ assessment.Increasing_help]"}}
     {negative_p:text(select) {label "[_ assessment.Allow_Negative]"} {options $boolean_options} {value $allow_negative_p} {help_text "[_ assessment.Allow_Negative_help]"}}
Index: openacs-4/packages/assessment/www/asm-admin/item-edit-mc.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/item-edit-mc.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/assessment/www/asm-admin/item-edit-mc.adp	15 Apr 2005 17:26:46 -0000	1.2
+++ openacs-4/packages/assessment/www/asm-admin/item-edit-mc.adp	18 Apr 2005 10:19:13 -0000	1.3
@@ -2,7 +2,6 @@
 <property name="title">@page_title;noquote@</property>
 <property name="context">@context;noquote@</property>
 
-<a href="@add_existing_link@">#assessment.add_item_type_mc_existing#</a>
 <blockquote>
   <formtemplate id="item_edit_mc"></formtemplate>
 </blockquote>
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.6 -r1.7
--- openacs-4/packages/assessment/www/asm-admin/item-edit-mc.tcl	15 Apr 2005 17:26:46 -0000	1.6
+++ openacs-4/packages/assessment/www/asm-admin/item-edit-mc.tcl	18 Apr 2005 10:19:13 -0000	1.7
@@ -27,12 +27,16 @@
     ad_script_abort
 }
 
+if {[template::form get_action item_show_mc] == "existing"} {
+    ad_returnredirect [export_vars -base item-edit-mc-existing {assessment_id section_id as_item_id}]
+    ad_script_abort
+}
+
 set page_title [_ assessment.edit_item_type_mc]
 set context [list [list index [_ assessment.admin]] [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] [list [export_vars -base item-edit {assessment_id section_id as_item_id}] [_ assessment.edit_item]] $page_title]
 
 set boolean_options [list [list "[_ assessment.yes]" t] [list "[_ assessment.no]" f]]
 set correct_options [list [list "[_ assessment.yes]" t]]
-set add_existing_link [export_vars -base "item-edit-mc-existing" {assessment_id section_id as_item_id}]
 
 
 ad_form -name item_edit_mc -action item-edit-mc -export { assessment_id section_id num_choices } -form {