Index: library/nx/nx.tcl
===================================================================
diff -u -r0e33ba821d29af5a646fd29c2722baedddcc25b8 -r13d14668e746b4f8c6461288cdd29673db4604dd
--- library/nx/nx.tcl	(.../nx.tcl)	(revision 0e33ba821d29af5a646fd29c2722baedddcc25b8)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision 13d14668e746b4f8c6461288cdd29673db4604dd)
@@ -20,7 +20,7 @@
     -object.configure configure
     -object.defaultmethod defaultmethod 
     -object.destroy destroy
-    -object.init init
+    -object.init {init ::nsf::methods::object::init}
     -object.move move 
     -object.objectparameter objectparameter 
     -object.unknown unknown
@@ -38,7 +38,7 @@
   foreach cmd [info command ::nsf::methods::object::*] {
     set cmdName [namespace tail $cmd]
     if {$cmdName in [list "autoname" "cleanup" "exists" \
-			 "filterguard" "instvar" "mixinguard" \
+			 "filterguard" "init" "instvar" "mixinguard" \
 			 "noinit" "requirenamespace" "residualargs"]} continue
     ::nsf::method::alias Object $cmdName $cmd 
   }
@@ -267,7 +267,7 @@
     # }
     
     # "init" must exist on Object. per default it is empty.
-    :protected method init args {}
+    #:protected method init args {}
 
     # this method is called on calls to object without a specified method
     :protected method defaultmethod {} {::nsf::self}