Index: generic/predefined.h
===================================================================
diff -u -rf9807b1cea03590c9573b5a521760538d53ee90f -r25de23e98a24210b149179c5d1f52836a65fddab
--- generic/predefined.h	(.../predefined.h)	(revision f9807b1cea03590c9573b5a521760538d53ee90f)
+++ generic/predefined.h	(.../predefined.h)	(revision 25de23e98a24210b149179c5d1f52836a65fddab)
@@ -378,7 +378,7 @@
 "inobject}\n"
 "::xotcl::ScopedNew method init {} {\n"
 ".public method new {-childof args} {\n"
-"::xotcl::instvar -object [::xotcl::self class] {inobject object} withclass\n"
+"::xotcl::importvar [::xotcl::self class] {inobject object} withclass\n"
 "if {![::xotcl::is $object object]} {\n"
 "$withclass create $object}\n"
 "eval ::xotcl::next -childof $object $args}}\n"
@@ -436,7 +436,7 @@
 "::eval $po configure [lrange $arg 1 end]\n"
 "if {[$po exists extra] || [$po exists setter] ||\n"
 "[$po exists getter] || [$po exists access]} {\n"
-"::xotcl::instvar -object $po extra setter getter access defaultParam\n"
+"::xotcl::importvar $po extra setter getter access defaultParam\n"
 "if {![info exists extra]} {set extra \"\"}\n"
 "if {![info exists defaultParam]} {set defaultParam \"\"}\n"
 "if {![info exists setter]} {set setter set}\n"