Index: generic/predefined.xotcl
===================================================================
diff -u -r9f7fa883bf6ed48f1401f815caca1e34f56584a1 -rdb7c710aa3b6386c33af9a318876f21a88b8aafd
--- generic/predefined.xotcl	(.../predefined.xotcl)	(revision 9f7fa883bf6ed48f1401f815caca1e34f56584a1)
+++ generic/predefined.xotcl	(.../predefined.xotcl)	(revision db7c710aa3b6386c33af9a318876f21a88b8aafd)
@@ -94,15 +94,6 @@
   Object create ::xotcl2::objectInfo
   Object create ::xotcl2::classInfo
 
-  foreach cmd [info command ::xotcl::cmd::ObjectInfo::*] {
-    ::xotcl::alias ::xotcl2::objectInfo [namespace tail $cmd] $cmd
-    ::xotcl::alias ::xotcl2::classInfo [namespace tail $cmd] $cmd
-  }
-  foreach cmd [info command ::xotcl::cmd::ClassInfo::*] {
-    ::xotcl::alias ::xotcl2::classInfo [namespace tail $cmd] $cmd
-  }
-  unset cmd
-
   #
   # It would be nice to do here "objectInfo configure {.alias ..}", but
   # we have no working objectparameter yet due to bootstrapping
@@ -132,6 +123,15 @@
     .alias unknown -source-object objectInfo -source-per-object -source-method unknown
   }
 
+  foreach cmd [info command ::xotcl::cmd::ObjectInfo::*] {
+    ::xotcl::alias ::xotcl2::objectInfo [namespace tail $cmd] $cmd
+    ::xotcl::alias ::xotcl2::classInfo [namespace tail $cmd] $cmd
+  }
+  foreach cmd [info command ::xotcl::cmd::ClassInfo::*] {
+    ::xotcl::alias ::xotcl2::classInfo [namespace tail $cmd] $cmd
+  }
+  unset cmd
+
   Object instforward info -onerror ::xotcl::infoError ::xotcl2::objectInfo %1 {%@2 %self}
   Class instforward info -onerror ::xotcl::infoError ::xotcl2::classInfo %1 {%@2 %self}