Index: library/lib/xotcl1.xotcl =================================================================== diff -u -r68e773f0a21300bd799c60fefc76f696fd230ca0 -rbe717fe9ef13e09dcfabf496ca61d75e4c042422 --- library/lib/xotcl1.xotcl (.../xotcl1.xotcl) (revision 68e773f0a21300bd799c60fefc76f696fd230ca0) +++ library/lib/xotcl1.xotcl (.../xotcl1.xotcl) (revision be717fe9ef13e09dcfabf496ca61d75e4c042422) @@ -489,7 +489,7 @@ ::xotcl::alias ::xotcl::Object move ::xotcl::classes::xotcl2::Object::move ::xotcl::alias ::xotcl::Object defaultmethod ::xotcl::classes::xotcl2::Object::defaultmethod - ::xotcl::alias ::xotcl::Class __unknown -per-object ::xotcl2::Class::__unknown + ::xotcl::alias ::xotcl::Class -per-object __unknown ::xotcl2::Class::__unknown ::xotcl::alias ::xotcl::Class parameter ::xotcl::classes::xotcl2::Class::parameter proc myproc {args} {linsert $args 0 [::xotcl::self]}