Index: tests/method-require.tcl =================================================================== diff -u -re2f11549ef70518cca8c9c49b1d78f4383b00a87 -rc5d841d4cd001b85e95e01202b4fc0afe75df6a8 --- tests/method-require.tcl (.../method-require.tcl) (revision e2f11549ef70518cca8c9c49b1d78f4383b00a87) +++ tests/method-require.tcl (.../method-require.tcl) (revision c5d841d4cd001b85e95e01202b4fc0afe75df6a8) @@ -12,10 +12,10 @@ # producing these.... # - nsf::provide_method append {::nsf::alias append -objscope ::append} - nsf::provide_method lappend {::nsf::alias lappend -objscope ::lappend} - nsf::provide_method set {::nsf::alias set -objscope ::set} - nsf::provide_method tcl::set {::nsf::alias set -objscope ::set} + nsf::provide_method append {::nsf::alias append -frame object ::append} + nsf::provide_method lappend {::nsf::alias lappend -frame object ::lappend} + nsf::provide_method set {::nsf::alias set -frame object ::set} + nsf::provide_method tcl::set {::nsf::alias set -frame object ::set} nsf::provide_method exists {::nsf::alias exists ::nsf::methods::object::exists} nsf::provide_method foo {::nsf::method foo {x y} {return x=$x,y=$y}} nsf::provide_method x {::nsf::mixin ::MIX} {