Index: library/nx/nx.tcl =================================================================== diff -u -r8d13fd583c573bffbc4b627edc74c608bcb71845 -r8e08d180ae5161c0ef4410ba3fda6b4de613a391 --- library/nx/nx.tcl (.../nx.tcl) (revision 8d13fd583c573bffbc4b627edc74c608bcb71845) +++ library/nx/nx.tcl (.../nx.tcl) (revision 8e08d180ae5161c0ef4410ba3fda6b4de613a391) @@ -1263,7 +1263,7 @@ if {![::nsf::isobject $object]} { $withclass create $object } - ::nsf::next -childof $object {*}$args + ::nsf::next [list -childof $object {*}$args] } } } @@ -1345,8 +1345,8 @@ } :method copyNSVarsAndCmds {orig dest} { - ::nsf::namespace_copyvars $orig $dest - ::nsf::namespace_copycmds $orig $dest + ::nsf::nscopyvars $orig $dest + ::nsf::nscopycmds $orig $dest } # construct destination obj name from old qualified ns name