Index: library/xotcl/library/xotcl2.tcl
===================================================================
diff -u -r364a9eda329acd7d20173a4165d71394d3061aae -r5be0457f1c90aecfbbefb23a545b2d1bb424f42c
--- library/xotcl/library/xotcl2.tcl	(.../xotcl2.tcl)	(revision 364a9eda329acd7d20173a4165d71394d3061aae)
+++ library/xotcl/library/xotcl2.tcl	(.../xotcl2.tcl)	(revision 5be0457f1c90aecfbbefb23a545b2d1bb424f42c)
@@ -968,12 +968,12 @@
       }
     }
     # provide minimal compatibility
-    :public forward proc %self public method
+    :public alias proc ::nsf::classes::xotcl::Object::proc
     :public method exists {var} {::nsf::var::exists [self] $var}
     :public method istype {class} [::nx::Object info method body ::nsf::classes::xotcl::Object::istype]
     :public alias set -frame object ::set
     :public alias residualargs ::nsf::methods::object::residualargs
-    :public alias instvar  ::nsf::methods::object::instvar
+    :public alias instvar ::nsf::methods::object::instvar
   }
 
   #