Index: TODO =================================================================== diff -u -re528761906857b0f8307d5bc9b94878168234965 -r4de94d222c600e532eab5df66719bea5c82c073e --- TODO (.../TODO) (revision e528761906857b0f8307d5bc9b94878168234965) +++ TODO (.../TODO) (revision 4de94d222c600e532eab5df66719bea5c82c073e) @@ -2877,7 +2877,7 @@ which unknown handlers can be registered - GetClassFromObj() receives as last argument "withUnknown" instead of baseClass to indicate, when unknown should be tried. -- new function NsfCallUnkownHandler() +- new function NsfCallUnknownHandler() - moved mixin reg type converter to a new file (nsfObj.c) - added NsfFilterregObjType, to provide a converter for filter @@ -3021,12 +3021,12 @@ - fix the comparison with "unknown" in residual args -- provide backward compatibility for unknwon method (when +- provide backward compatibility for unknown method (when method contains spaces). - some minor cleanup - extended regression test +- fix typos in string "unknown" (unknwon, unkown) - TODO: - Revise callstack introspection/intercession, i.e., [current Index: generic/nsf.c =================================================================== diff -u -re528761906857b0f8307d5bc9b94878168234965 -r4de94d222c600e532eab5df66719bea5c82c073e --- generic/nsf.c (.../nsf.c) (revision e528761906857b0f8307d5bc9b94878168234965) +++ generic/nsf.c (.../nsf.c) (revision 4de94d222c600e532eab5df66719bea5c82c073e) @@ -1148,9 +1148,9 @@ /* *---------------------------------------------------------------------- - * NsfCallUnkownHandler -- + * NsfCallUnknownHandler -- * - * Call ::nsf::unkown; this function is typically called, when an unknown + * Call ::nsf::unknown; this function is typically called, when an unknown * object or class is passed as an argument. * * Results: @@ -1163,7 +1163,7 @@ */ static int -NsfCallUnkownHandler(Tcl_Interp *interp, Tcl_Obj *nameObj) { +NsfCallUnknownHandler(Tcl_Interp *interp, Tcl_Obj *nameObj) { int result = 0; Tcl_Obj *ov[3]; @@ -1269,10 +1269,10 @@ } if (withUnknown) { - result = NsfCallUnkownHandler(interp, isAbsolutePath(objName) ? objPtr : - NameInNamespaceObj(interp, - objName, - CallingNameSpace(interp))); + result = NsfCallUnknownHandler(interp, isAbsolutePath(objName) ? objPtr : + NameInNamespaceObj(interp, + objName, + CallingNameSpace(interp))); if (result == TCL_OK) { /* Retry, but now, the last argument (withUnknown) has to be 0 */ @@ -3959,7 +3959,7 @@ NSRequireParentObject(Tcl_Interp *interp, CONST char *parentName) { int result; - result = NsfCallUnkownHandler(interp, Tcl_NewStringObj(parentName, -1)); + result = NsfCallUnknownHandler(interp, Tcl_NewStringObj(parentName, -1)); if (result == TCL_OK) { NsfObject *parentObj = (NsfObject *) GetObjectFromString(interp, parentName); @@ -10196,7 +10196,7 @@ } else { /* - * The option is still unkown, check the Tcl string-is checkers + * The option is still unknown, check the Tcl string-is checkers */ Tcl_DStringFree(dsPtr); Index: library/nx/nx.tcl =================================================================== diff -u -r1af8aba52df547aa435235e6ad307d7b97655de9 -r4de94d222c600e532eab5df66719bea5c82c073e --- library/nx/nx.tcl (.../nx.tcl) (revision 1af8aba52df547aa435235e6ad307d7b97655de9) +++ library/nx/nx.tcl (.../nx.tcl) (revision 4de94d222c600e532eab5df66719bea5c82c073e) @@ -57,7 +57,7 @@ namespace eval ::nsf::methods::object {}; # make pkg indexer happy # Actually, we do not need an unknown handler, but if someone - # defines his own unknwon handler we define it automatically + # defines his own unknown handler we define it automatically proc ::nsf::methods::object::unknown {m args} { error "[::nsf::self]: unable to dispatch method '$m'" } Index: library/xotcl/tests/testx.xotcl =================================================================== diff -u -rceb5634acd12db91d50b16bcec1bda5906922ced -r4de94d222c600e532eab5df66719bea5c82c073e --- library/xotcl/tests/testx.xotcl (.../testx.xotcl) (revision ceb5634acd12db91d50b16bcec1bda5906922ced) +++ library/xotcl/tests/testx.xotcl (.../testx.xotcl) (revision 4de94d222c600e532eab5df66719bea5c82c073e) @@ -3371,7 +3371,7 @@ # this version of unknown creates gobal objects Class proc __unknown {name} { - #puts "unkown called with $name" + #puts "unknown called with $name" set name ::[namespace tail $name] set x [Class $name] set r [$x]