Index: generic/xotcl.c
===================================================================
diff -u -r851e2c38fe3ae9d84f531605d55defe2e1308a02 -rd2f17f8dd98fcfa82a8473ed5e299c7c2026a80f
--- generic/xotcl.c	(.../xotcl.c)	(revision 851e2c38fe3ae9d84f531605d55defe2e1308a02)
+++ generic/xotcl.c	(.../xotcl.c)	(revision d2f17f8dd98fcfa82a8473ed5e299c7c2026a80f)
@@ -364,7 +364,7 @@
   XOTclObject *object = (XOTclObject*) clientData;
   int result;
   ALLOC_ON_STACK(Tcl_Obj*, objc, tov);
-  /*fprintf(stderr, "%%%% callmethod called with method %p\n", method),*/
+  /*fprintf(stderr, "%%%% callmethod called with method %p\n", methodObj),*/
 
   tov[0] = object->cmdName;
   tov[1] = methodObj;
@@ -374,7 +374,7 @@
 
   /*fprintf(stderr, "%%%% callMethod cmdname=%s, method=%s, objc=%d\n",
     ObjStr(tov[0]), ObjStr(tov[1]), objc);
-    {int i; fprintf(stderr, "\t CALL: %s ", ObjStr(method));for(i=0; i<objc-2; i++) {
+    {int i; fprintf(stderr, "\t CALL: %s ", ObjStr(methodObj));for(i=0; i<objc-2; i++) {
     fprintf(stderr, "%s ", ObjStr(objv[i]));} fprintf(stderr, "\n");}*/
 
   result = ObjectDispatch(clientData, interp, objc, tov, flags);
@@ -695,6 +695,7 @@
     if (methodObj) {
       /*fprintf(stderr, "+++ calling __unknown for %s name=%s\n", 
 	className(baseClass), ObjStr(nameObj));*/
+
       result = callMethod((ClientData) baseClass, interp, methodObj,
                           3, &nameObj, XOTCL_CM_NO_PROTECT);
       if (result == TCL_OK) {