Index: library/lib/xotcl1.xotcl
===================================================================
diff -u -rae1f8003c9b771906e285970f31ff9f12ce40558 -r5008260d12072f5542b81dfed2d512f906326e32
--- library/lib/xotcl1.xotcl	(.../xotcl1.xotcl)	(revision ae1f8003c9b771906e285970f31ff9f12ce40558)
+++ library/lib/xotcl1.xotcl	(.../xotcl1.xotcl)	(revision 5008260d12072f5542b81dfed2d512f906326e32)
@@ -305,14 +305,15 @@
   }
   foreach cmd [::info command ::xotcl::cmd::ClassInfo::*] {
     set cmdName [namespace tail $cmd]
-    if {$cmdName in [list "method" "methods" "mixin"]} continue
+    if {$cmdName in [list "method" "methods" "mixin" "mixinguard"]} continue
     ::xotcl::alias ::xotcl::classInfo $cmdName $cmd
   }
   ::xotcl::alias ::xotcl::objectInfo is ::xotcl::is
   ::xotcl::alias ::xotcl::classInfo is ::xotcl::is
   ::xotcl::alias ::xotcl::classInfo classparent ::xotcl::cmd::ObjectInfo::parent
   ::xotcl::alias ::xotcl::classInfo classchildren ::xotcl::cmd::ObjectInfo::children
   ::xotcl::alias ::xotcl::classInfo instmixin ::xotcl::cmd::ClassInfo::mixin
+  ::xotcl::alias ::xotcl::classInfo instmixinguard ::xotcl::cmd::ClassInfo::mixinguard
 
   # define info methods from objectInfo on classInfo as well
   ::xotcl::alias classInfo body     objectInfo::body