Index: generic/predefined.h
===================================================================
diff -u -rb6b46467581277d91ecb78318df079581c1b65fe -r9ebd1309a52b27ab92e9e3cce07037767efe4a4f
--- generic/predefined.h	(.../predefined.h)	(revision b6b46467581277d91ecb78318df079581c1b65fe)
+++ generic/predefined.h	(.../predefined.h)	(revision 9ebd1309a52b27ab92e9e3cce07037767efe4a4f)
@@ -50,16 +50,17 @@
 ".alias is ::xotcl::is\n"
 ".alias classparent ::xotcl::cmd::ObjectInfo::parent\n"
 ".alias classchildren ::xotcl::cmd::ObjectInfo::children\n"
-".alias info [::xotcl::cmd::ObjectInfo::method objectInfo -per-object name info]\n"
-".alias unknown [::xotcl::cmd::ObjectInfo::method objectInfo -per-object name info]}\n"
+".alias info [::xotcl::cmd::ObjectInfo::method objectInfo name info]\n"
+".alias unknown [::xotcl::cmd::ObjectInfo::method objectInfo name info]}\n"
 "foreach cmd [info command ::xotcl::cmd::ObjectInfo::*] {\n"
 "::xotcl::alias ::xotcl2::objectInfo [namespace tail $cmd] $cmd\n"
 "::xotcl::alias ::xotcl2::classInfo [namespace tail $cmd] $cmd}\n"
 "foreach cmd [info command ::xotcl::cmd::ClassInfo::*] {\n"
 "::xotcl::alias ::xotcl2::classInfo [namespace tail $cmd] $cmd}\n"
 "unset cmd\n"
 "Object forward info -onerror ::xotcl::infoError ::xotcl2::objectInfo %1 {%@2 %self}\n"
-"Class  forward info -onerror ::xotcl::infoError ::xotcl2::classInfo %1 {%@2 %self}\n"
+"Class forward  info -onerror ::xotcl::infoError ::xotcl2::classInfo %1 {%@2 %self}\n"
+"::xotcl::dispatch ::xotcl2::classInfo ::xotcl::cmd::Object::forward \"-per-object\" ::xotcl2::objectInfo {%@2 %1}\n"
 "proc ::xotcl::infoError msg {\n"
 "regsub -all \" <object>\" $msg \"\" msg\n"
 "regsub -all \" <class>\" $msg \"\" msg\n"