Index: library/xotcl/tests/slottest.xotcl
===================================================================
diff -u -rb75c46b9676c6aeff6a95a12f8cafeb420530751 -rf3cb5afe6aa1b6761b4a9909058f64ff7d64ab92
--- library/xotcl/tests/slottest.xotcl	(.../slottest.xotcl)	(revision b75c46b9676c6aeff6a95a12f8cafeb420530751)
+++ library/xotcl/tests/slottest.xotcl	(.../slottest.xotcl)	(revision f3cb5afe6aa1b6761b4a9909058f64ff7d64ab92)
@@ -169,18 +169,18 @@
 
 Object o1
 o1 set i 0
-::nx::core::alias o1 Incr -objscope ::incr
+::nsf::alias o1 Incr -objscope ::incr
 ? {o1 incr i} 1 "method incr"
 ? {o1 Incr i} 1002 "aliased tcl incr"
 ? {o1 incr i} 2003 "method incr"
 ? {o1 Incr i} 3004 "aliased tcl incr"
 
-::nx::core::alias ::xotcl::Object Set -objscope ::set
+::nsf::alias ::xotcl::Object Set -objscope ::set
 ? {o1 set i 1} 1 "method set"
 ? {o1 set i} 1 "method set"
 ? {o1 Set i 1} 1 "aliased tcl set"
 ? {o1 Set i} 1 "aliased tcl set"
-::nx::core::alias o1 Set -objscope ::set
+::nsf::alias o1 Set -objscope ::set
 ? {o1 Set i 1} 1 "aliased object tcl set"
 ? {o1 Set i} 1 "aliased object tcl set"
 ::xotcl::Object instforward SSet -earlybinding -objscope ::set
@@ -191,15 +191,15 @@
 o1 set z 100
 #o1 forward z o1 [list %argclindex [list set set]] %proc
 #o1 proc get name {my set $name}
-o1 forward get -earlybinding ::nx::core::setvar %self %1
+o1 forward get -earlybinding ::nsf::setvar %self %1
 ? {o1 get z 101} 101
 ? {o1 get z} "101"
 
 ? {o1 get z} 101 "get value via new parametercmd get"
 ? {o1 get z 124} 124 "set value via new parametercmd get"
 
 
-o1 forward zz -earlybinding ::nx::core::setvar %self %proc
+o1 forward zz -earlybinding ::nsf::setvar %self %proc
 ? {o1 zz 123} 123
 ? {o1 zz} 123
 
@@ -319,7 +319,7 @@
 ? {a0 procsearch f3} "::a0 proc f3"
 ? {a0 procsearch f4} "::a0 forward f4"
 ? {a0 procsearch set} "::xotcl::Object instcmd set"
-? {A slot foo info callable -which assign} "::nx::ObjectParameterSlot alias assign ::nx::core::setvar"
+? {A slot foo info callable -which assign} "::nx::ObjectParameterSlot alias assign ::nsf::setvar"
 
 # redefine setter for foo of class A
 A slot foo method assign {domain var val} {
@@ -536,7 +536,7 @@
 ? {o1 myf 100} 200
 
 o1 set x 42
-o1 forward x -earlybinding ::nx::core::setvar %self %proc
+o1 forward x -earlybinding ::nsf::setvar %self %proc
 ? [list o1 x] 42
 ? [list o1 x 41] 41
 ? {o1 x} "get parametercmd via forward (earlybinding)"
@@ -559,7 +559,7 @@
 ? {o1 myfdset y} "get instvar value via forward -earlybinding"
 ? {o1 myfdset y 123} "set instvar value via forward -earlybinding"
 
-::nx::core::alias o1 myset -objscope ::set
+::nsf::alias o1 myset -objscope ::set
 o1 myset x 101
 ? {o1 myset x} 101
 
@@ -575,7 +575,7 @@
 P create p2 -age 345 -s 567
 
 ? {p2 age} "parametercmd read"
-? {::nx::core::setvar p2 age} "via setinstvar"
+? {::nsf::setvar p2 age} "via setinstvar"
 ? {p2 s} "parameter read with setter"