Index: openacs-4/packages/assessment/lib/comments-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/comments-chunk.tcl,v
diff -u -N -r1.6 -r1.6.2.1
--- openacs-4/packages/assessment/lib/comments-chunk.tcl	28 Jun 2018 10:39:36 -0000	1.6
+++ openacs-4/packages/assessment/lib/comments-chunk.tcl	17 Aug 2022 17:07:21 -0000	1.6.2.1
@@ -1,22 +1,13 @@
-# packages/assessment/lib/comments-chunk.tcl
-#
-# shows comments for an object
-#
-# @author Deds Castillo (deds@i-manila.com.ph)
-# @creation-date 2005-08-16
-# @arch-tag: 989f6620-380f-49b9-a6e0-00c0effd7bb8
-# @cvs-id $Id$
+ad_include_contract {
+    Shows comments for an object
 
-foreach required_param {object_id} {
-    if {![info exists $required_param]} {
-        return -code error "$required_param is a required parameter."
-    }
+    @author Deds Castillo (deds@i-manila.com.ph)
+    @creation-date 2005-08-16
+    @arch-tag: 989f6620-380f-49b9-a6e0-00c0effd7bb8
+    @cvs-id $Id$
+} {
+    object_id:object_type(acs_object)
 }
-foreach optional_param {} {
-    if {![info exists $optional_param]} {
-        set $optional_param {}
-    }
-}
 
 set return_url [ad_return_url]