Index: TODO
===================================================================
diff -u -r5c464365425434543edd13f1674e1dd2d7f17a71 -rab02510271f298ae1c4b3aa585a018badc84b013
--- TODO	(.../TODO)	(revision 5c464365425434543edd13f1674e1dd2d7f17a71)
+++ TODO	(.../TODO)	(revision ab02510271f298ae1c4b3aa585a018badc84b013)
@@ -2674,6 +2674,13 @@
     "cls info superclass -closure" would return the same
   * replaced loops with NsfClassListFind()
 
+- nsf.c:
+  * handle direct dispatches for aliased methods
+  * new generalized error message: NsfNoCurrentObjectError()
+
+- nx.tcl: replace loops ::nsf::methods::[object|class]::* 
+  by explict command registrations
+
 TODO:
 
 - the last two results of "info heritage" in info-method.test are not
Index: library/nx/nx.tcl
===================================================================
diff -u -r3229646028f9bb1905fdae8fdf8883d5b40e0ea0 -rab02510271f298ae1c4b3aa585a018badc84b013
--- library/nx/nx.tcl	(.../nx.tcl)	(revision 3229646028f9bb1905fdae8fdf8883d5b40e0ea0)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision ab02510271f298ae1c4b3aa585a018badc84b013)
@@ -39,14 +39,11 @@
   #
   # provide the standard command set for ::nx::Object
   #
-  foreach cmd [info command ::nsf::methods::object::*] {
-    set cmdName [namespace tail $cmd]
-    if {$cmdName in [list "autoname" "cleanup" "class" "exists" \
-			 "filterguard" "instvar" "mixinguard" \
-			 "noinit" "requirenamespace" "residualargs" \
-			 "unknown" "init" "defaultmethod"]} continue
-    ::nsf::method::alias Object $cmdName $cmd 
-  }
+  ::nsf::method::alias Object volatile  ::nsf::methods::object::volatile 
+  ::nsf::method::alias Object configure ::nsf::methods::object::configure 
+  ::nsf::method::alias Object upvar     ::nsf::methods::object::upvar 
+  ::nsf::method::alias Object destroy   ::nsf::methods::object::destroy 
+  ::nsf::method::alias Object uplevel   ::nsf::methods::object::uplevel
 
   #
   # provide ::eval as method for ::nx::Object
@@ -74,13 +71,8 @@
   #
   
   # provide the standard command set for Class
-  foreach cmd [info command ::nsf::methods::class::*] {
-    set cmdName [namespace tail $cmd]
-    if {$cmdName in [list "filterguard" "mixinguard" \
-		     "alloc" "dealloc" "recreate" "superclass"]} continue
-    ::nsf::method::alias Class $cmdName $cmd 
-    unset cmdName
-  }
+  ::nsf::method::alias Class create ::nsf::methods::class::create 
+  ::nsf::method::alias Class new ::nsf::methods::class::new
 
   # set a few aliases as protected
   # "__next", if defined, should be added as well