Index: generic/predefined.h =================================================================== diff -u -re3a84e351aaf79c02a63cc0741dde7b9bd550849 -r596677fb3ed1e15dc62a04789781347fb3dbc369 --- generic/predefined.h (.../predefined.h) (revision e3a84e351aaf79c02a63cc0741dde7b9bd550849) +++ generic/predefined.h (.../predefined.h) (revision 596677fb3ed1e15dc62a04789781347fb3dbc369) @@ -4,9 +4,9 @@ "namespace eval ::nsf::method::create {\n" "namespace export alias}\n" "namespace export configure finalize interp is my relation\n" -"proc ::nsf::provide_method {require_name definition {script \"\"}} {\n" +"proc ::nsf::method::provide {require_name definition {script \"\"}} {\n" "set ::nsf::methodIndex($require_name) [list definition $definition script $script]}\n" -"proc ::nsf::require_method {object name {per_object 0}} {\n" +"proc ::nsf::method::require {object name {per_object 0}} {\n" "set key ::nsf::methodIndex($name)\n" "if {[info exists $key]} {\n" "array set \"\" [set $key]\n" @@ -33,8 +33,8 @@ "set oldSetting [::nsf::relation $object $rel]\n" "uplevel [list ::nsf::relation $object $rel [linsert $oldSetting 0 $classes]]} else {\n" "uplevel [list ::nsf::relation $object $rel \"\"]}}\n" -"::nsf::provide_method autoname {::nsf::method::alias autoname ::nsf::methods::object::autoname}\n" -"::nsf::provide_method exists {::nsf::method::alias exists ::nsf::methods::object::exists}\n" +"::nsf::method::provide autoname {::nsf::method::alias autoname ::nsf::methods::object::autoname}\n" +"::nsf::method::provide exists {::nsf::method::alias exists ::nsf::methods::object::exists}\n" "proc ::nsf::exithandler {args} {\n" "lassign $args op value\n" "switch $op {\n"