Index: openacs-4/packages/xotcl-core/tcl/cr-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/cr-procs.tcl,v diff -u -r1.54.2.11 -r1.54.2.12 --- openacs-4/packages/xotcl-core/tcl/cr-procs.tcl 13 Feb 2016 15:34:55 -0000 1.54.2.11 +++ openacs-4/packages/xotcl-core/tcl/cr-procs.tcl 30 Mar 2016 10:31:29 -0000 1.54.2.12 @@ -48,8 +48,8 @@ # CrClass ad_proc get_object_type { - -item_id - {-revision_id 0} + -item_id:integer,required + {-revision_id:integer 0} } { Return the object type for an item_id or revision_id. @@ -77,8 +77,8 @@ } CrClass ad_proc get_instance_from_db { - {-item_id 0} - {-revision_id 0} + {-item_id:integer 0} + {-revision_id:integer 0} } { Instantiate the live revision or the specified revision of an CrItem. The XOTcl object is destroyed automatically on cleanup