Index: generic/nsf.c =================================================================== diff -u -r1af8aba52df547aa435235e6ad307d7b97655de9 -rece181a287bd6c4ac18c067a115dc099f47a029d --- generic/nsf.c (.../nsf.c) (revision 1af8aba52df547aa435235e6ad307d7b97655de9) +++ generic/nsf.c (.../nsf.c) (revision ece181a287bd6c4ac18c067a115dc099f47a029d) @@ -8554,7 +8554,7 @@ * we pass the object as first argument of the unknown * handler. */ - fprintf(stderr, "next calls DispatchUnknownMethod\n"); + /*fprintf(stderr, "next calls DispatchUnknownMethod\n");*/ Tcl_Obj *callInfoObj = Tcl_NewListObj(0,NULL); Tcl_ListObjAppendList(interp, callInfoObj, Index: tests/disposition.test =================================================================== diff -u -r1af8aba52df547aa435235e6ad307d7b97655de9 -rece181a287bd6c4ac18c067a115dc099f47a029d --- tests/disposition.test (.../disposition.test) (revision 1af8aba52df547aa435235e6ad307d7b97655de9) +++ tests/disposition.test (.../disposition.test) (revision ece181a287bd6c4ac18c067a115dc099f47a029d) @@ -800,7 +800,8 @@ ? {[C create c] FOO} "::c-FOO" C setObjectParams [list [list FOO:alias,noarg ""]] # UNPATCHED: - # ? {C create c} "::c-FOO" + # ? {C create c} "::c-{} FOO" + ? {C create c} "::c-FOO" C public method "show me" {} { set :msg [::nsf::current]-[::nsf::current methodpath] }