Index: generic/xotcl.c
===================================================================
diff -u -r458415a66f28b742de657628d4e4d6d27309c110 -rb62dcaa16d03cd56d95a75f493cbd0de0fb5c60b
--- generic/xotcl.c	(.../xotcl.c)	(revision 458415a66f28b742de657628d4e4d6d27309c110)
+++ generic/xotcl.c	(.../xotcl.c)	(revision b62dcaa16d03cd56d95a75f493cbd0de0fb5c60b)
@@ -11336,7 +11336,7 @@
              className(cl), objectName(nobj)); */
           nclopt = XOTclRequireClassOpt((XOTclClass*) nobj);
           CmdListAdd(&nclopt->isClassMixinOf, cl->object.id, NULL, /*noDuplicates*/ 1);
-        } /* else fprintf(stderr, "Problem registering %s as a instmixinof of %s\n",
+        } /* else fprintf(stderr, "Problem registering %s as a class-mixin of %s\n",
              ObjStr(ov[i]), className(cl)); */
       }
       break;
@@ -12957,7 +12957,7 @@
   return class->opt ? GuardList(interp, class->opt->instmixins, mixin) : TCL_OK;
 }
 
-static int XOTclClassInfoInstmixinofMethod(Tcl_Interp *interp, XOTclClass * class, int withClosure,
+static int XOTclClassInfoClassMixinOfMethod(Tcl_Interp *interp, XOTclClass * class, int withClosure,
 				char *patternString, XOTclObject *patternObj) {
   XOTclClassOpt *opt = class->opt;
   int rc;
@@ -12980,7 +12980,7 @@
   return TCL_OK;
 }
 
-static int XOTclClassInfoMixinofMethod(Tcl_Interp *interp, XOTclClass * class, int withClosure,
+static int XOTclClassInfoObjectMixinOfMethod(Tcl_Interp *interp, XOTclClass * class, int withClosure,
                             char *patternString, XOTclObject *patternObj) {
   XOTclClassOpt *opt = class->opt;
   int rc = 0;