Index: library/xotcl/library/xotcl2.tcl
===================================================================
diff -u -r353fdf460e5124d48f9ebe0f37e23abe51494b38 -r9dcea2682e9ff0f6d5d976572b0dc1f026abd662
--- library/xotcl/library/xotcl2.tcl	(.../xotcl2.tcl)	(revision 353fdf460e5124d48f9ebe0f37e23abe51494b38)
+++ library/xotcl/library/xotcl2.tcl	(.../xotcl2.tcl)	(revision 9dcea2682e9ff0f6d5d976572b0dc1f026abd662)
@@ -418,7 +418,7 @@
 
   Class instproc unknown {args} {
     #puts stderr "use '[self] create $args', not '[self] $args'"
-    uplevel [list [self] create {*}$args]
+    :uplevel [list [self] create {*}$args]
   }
 
   Object instproc unknown {m args} {