Index: generic/nsf.c =================================================================== diff -u -rea714cba2d65e425ab64d6c76a11d60c8b2dc5ea -rc0e938bd38f20da1abab14c10922bff124f998d6 --- generic/nsf.c (.../nsf.c) (revision ea714cba2d65e425ab64d6c76a11d60c8b2dc5ea) +++ generic/nsf.c (.../nsf.c) (revision c0e938bd38f20da1abab14c10922bff124f998d6) @@ -8466,13 +8466,13 @@ assert(object); if (CallDirectly(interp, object, NSF_o_defaultmethod_idx, &methodObj)) { - fprintf(stderr, "DispatchDefaultMethod direct\n"); + Tcl_SetObjResult(interp, object->cmdName); result = TCL_OK; } else { Tcl_Obj *tov[2]; - fprintf(stderr, "DispatchDefaultMethod dispatch\n"); + tov[0] = obj; tov[1] = methodObj; result = ObjectDispatch(clientData, interp, 2, tov, flags|NSF_CM_NO_UNKNOWN);