Index: generic/predefined.h
===================================================================
diff -u -r6a0e62b53f8b405d11f009e3c0acb2098702d921 -re2f11549ef70518cca8c9c49b1d78f4383b00a87
--- generic/predefined.h	(.../predefined.h)	(revision 6a0e62b53f8b405d11f009e3c0acb2098702d921)
+++ generic/predefined.h	(.../predefined.h)	(revision e2f11549ef70518cca8c9c49b1d78f4383b00a87)
@@ -22,18 +22,21 @@
 "set rel \"mixin\"}\n"
 "set oldSetting [::nsf::relation $object $rel]\n"
 "uplevel [list ::nsf::relation $object $rel [linsert $oldSetting end $args]]}\n"
-"::nsf::provide_method autoname {::nsf::alias autoname ::nsf::cmd::Object::autoname}\n"
-"::nsf::provide_method exists   {::nsf::alias  exists ::nsf::cmd::Object::exists}\n"
+"::nsf::provide_method autoname {::nsf::alias autoname ::nsf::methods::object::autoname}\n"
+"::nsf::provide_method exists   {::nsf::alias  exists ::nsf::methods::object::exists}\n"
 "proc ::nsf::infoError msg {\n"
 "regsub -all \" <object>\" $msg \"\" msg\n"
 "regsub -all \" <class>\" $msg \"\" msg\n"
 "regsub {\\\"} $msg \"\\\"info \" msg\n"
 "error $msg \"\"}\n"
-"proc ::nsf::unsetExitHandler {} {\n"
-"proc ::nsf::__exitHandler {} {}}\n"
-"proc ::nsf::setExitHandler {newbody} {::proc ::nsf::__exitHandler {} $newbody}\n"
-"proc ::nsf::getExitHandler {} {::info body ::nsf::__exitHandler}\n"
-"::nsf::unsetExitHandler\n"
+"proc ::nsf::exithandler {args} {\n"
+"lassign $args up value\n"
+"switch {$op} {\n"
+"set {::proc ::nsf::__exithandler {} $value}\n"
+"get {::info body ::nsf::__exithandler}\n"
+"unset {::proc ::nsf::__exithandler {} {;}}\n"
+"default {puts \"syntax: ::nsf::exithandler set|get|unset ?arg?\"}}}\n"
+"::nsf::exithandler unset\n"
 "proc tmpdir {} {\n"
 "foreach e [list TMPDIR TEMP TMP] {\n"
 "if {[info exists ::env($e)] \\\n"