Index: tests/aliastest.xotcl
===================================================================
diff -u -re5b7b9261b0de87bf7a45ff7416ecd967037fa0b -r210eab6d9149846d5d6a6a8e0fa74e232ca5b6de
--- tests/aliastest.xotcl	(.../aliastest.xotcl)	(revision e5b7b9261b0de87bf7a45ff7416ecd967037fa0b)
+++ tests/aliastest.xotcl	(.../aliastest.xotcl)	(revision 210eab6d9149846d5d6a6a8e0fa74e232ca5b6de)
@@ -14,7 +14,7 @@
 
 # define an alias and retrieve its definition
 Class create Base {
-  .method foo {{-x 1}} {return $x}
+  :method foo {{-x 1}} {return $x}
 }
 
 Class create Foo
@@ -216,17 +216,17 @@
 # dot-resolver/ dot-dispatcher used in aliased proc
 
 Class create V {
-  set .z 1
+  set :z 1
 }
 
 V create v {
-  set .z 2
+  set :z 2
 }
 
 V method bar {z} { return $z }
 V object method bar {z} { return $z }
 
-proc foo args { return [.bar ${.z}]-[set .z]-[my bar [set .z]] }
+proc foo args { return [:bar ${:z}]-[set :z]-[my bar [set :z]] }
 
 ::xotcl::alias V FOO1 ::foo 
 ::xotcl::alias V -per-object FOO2 ::foo