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.12 -r1.13
--- openacs-4/packages/assessment/lib/item-show-mc.tcl	7 Aug 2017 23:48:03 -0000	1.12
+++ openacs-4/packages/assessment/lib/item-show-mc.tcl	3 Sep 2024 15:37:35 -0000	1.13
@@ -1,6 +1,11 @@
-# Display multiple choice type data.
-# author Timo Hentschel (timo@timohentschel.de)
+ad_include_contract {
+    Display multiple choice type data.
 
+    @author Timo Hentschel (timo@timohentschel.de)
+} {
+    as_item_id:object_type(acs_object)
+}
+
 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]]