Index: TODO
===================================================================
diff -u -r2f6bcca3537584c8ef1f9fc71b230e79d1560504 -rf93a2f18571f5f0fe266cd26299f463d55f0ac2d
--- TODO	(.../TODO)	(revision 2f6bcca3537584c8ef1f9fc71b230e79d1560504)
+++ TODO	(.../TODO)	(revision f93a2f18571f5f0fe266cd26299f463d55f0ac2d)
@@ -4309,32 +4309,42 @@
    /metacls/ create cls -filter f1 -object-filter f2
 
 - as a consequence,
-  a) "/cls/ class method ...",
-     "/cls/ class alias ...",
-     "/cls/ class forward ...",
-     "/cls/ class filter ...",
-     "/cls/ class mixin ...",
+  a) "/cls/ class method ..."
+     "/cls/ class alias ..."
+     "/cls/ class forward ..."
+     "/cls/ class filter ..."
+     "/cls/ class filterguard ..."
+     "/cls/ class mixin ..."
+     "/cls/ class mixinguard ..."
      "/cls/ class info ..." 
      "/obj/ class method require method ..."
      "/obj/ class method require public method ..."
      "/obj/ class method require protected method ..."
      "/obj/ class method require private method ..."
      "/cls/ class property ..." 
      "/cls/ class variable ..." 
+     "/cls/ class delete property ..." 
+     "/cls/ class delete variable ..." 
+     "/cls/ class delete method ..." 
+     "/cls/ require class method ..." 
+     "/cls/ require public class method ..." 
+     "/cls/ require protected class method ..." 
+     "/cls/ require private class method ..." 
+
     were dropped 
 
-  b) "/obj/ method ....", 
-     "/obj/ alias ....", 
+  b) "/obj/ method ...."
+     "/obj/ alias ...."
      "/obj/ forward ...."
      "/obj/ filter ...."
      "/obj/ mixin ...."
      "/obj/ info method*" 
      "/cls/ create obj -mixin M"
      "/cls/ create obj -filter f"
-     "/obj/ method require method ..."
-     "/obj/ method require public method ..."
-     "/obj/ method require protected method ..."
-     "/obj/ method require private method ..."
+     "/obj/ require method ..."
+     "/obj/ require public method ..."
+     "/obj/ require protected method ..."
+     "/obj/ require private method ..."
      were dropped 
      
 - added package nx::class-method to allow optionally the "class" notation
@@ -4430,7 +4440,7 @@
 Method and configure parameter reform, Part 3:
 - added 
 
-    /cls/ info lookup variables                  -> list of handles
+    /obj/ info lookup variables                  -> list of handles
     /obj/ info lookup object variables           -> list of handles
     /obj/ info variable definition|name|parameter /handle/
 
@@ -4533,6 +4543,9 @@
   (when application stays away from variables stating with double
   underscore)
 
+- completed coverage if plain-object-method.tcl
+- provide warnings via plain-object-method.tcl via "nsf::log warn ..."
+
 ========================================================================
 TODO:
 
Index: library/nx/plain-object-method.tcl
===================================================================
diff -u -rb531a50ecc43d0c13e2432b099a436c3260c7a49 -rf93a2f18571f5f0fe266cd26299f463d55f0ac2d
--- library/nx/plain-object-method.tcl	(.../plain-object-method.tcl)	(revision b531a50ecc43d0c13e2432b099a436c3260c7a49)
+++ library/nx/plain-object-method.tcl	(.../plain-object-method.tcl)	(revision f93a2f18571f5f0fe266cd26299f463d55f0ac2d)
@@ -7,35 +7,35 @@
     :public method method {      
       name arguments:parameter,0..* -returns body -precondition -postcondition
     } {
-      puts stderr "LEGACY CMD: [self] [current method] [current args]"
+      ::nsf::log warn "LEGACY CMD: [self] [current method] [current args]"
       :public object [current method] {*}[current args]
     }
 
     :public method alias args {
-      puts stderr "LEGACY CMD: [self] [current method] [current args]"
+      ::nsf::log warn "LEGACY CMD: [self] [current method] [current args]"
       :public object [current method] {*}$args
     }
     :public method forward args {
-      puts stderr "LEGACY CMD: [self] [current method] [current args]"
+      ::nsf::log warn "LEGACY CMD: [self] [current method] [current args]"
       :public object [current method] {*}$args
     }
 
-    :public method mixin args {
-      puts stderr "LEGACY CMD: [self] [current method] [current args]"
+    :public method filter args {
+      ::nsf::log warn "LEGACY CMD: [self] [current method] [current args]"
       :object [current method] {*}$args
     }
 
-    :public method filter args {
-      puts stderr "LEGACY CMD: [self] [current method] [current args]"
+    :public method mixin args {
+      ::nsf::log warn "LEGACY CMD: [self] [current method] [current args]"
       :object [current method] {*}$args
     }
 
     :public method property args {
-      puts stderr "LEGACY CMD: [self] [current method] [current args]"
+      ::nsf::log warn "LEGACY CMD: [self] [current method] [current args]"
       :object [current method] {*}$args
     }
     :public method variable args {
-      puts stderr "LEGACY CMD: [self] [current method] [current args]"
+      ::nsf::log warn "LEGACY CMD: [self] [current method] [current args]"
       :object [current method] {*}$args
     }
 
@@ -46,6 +46,11 @@
     :public alias "info mixin guard"      ::nsf::methods::object::info::mixinguard
     :public alias "info mixin classes"    ::nsf::methods::object::info::mixinclasses
 
+    :public method "info slots" args {
+      ::nsf::log warn "LEGACY CMD: [self] [current method] [current args]"
+      :object [current method] {*}$args
+    }
+
   }
 
 
Index: tests/plain-object-method.test
===================================================================
diff -u -rea3bbe8b1039c45baa2c027c005151e04e57d4b1 -rf93a2f18571f5f0fe266cd26299f463d55f0ac2d
--- tests/plain-object-method.test	(.../plain-object-method.test)	(revision ea3bbe8b1039c45baa2c027c005151e04e57d4b1)
+++ tests/plain-object-method.test	(.../plain-object-method.test)	(revision f93a2f18571f5f0fe266cd26299f463d55f0ac2d)
@@ -37,5 +37,5 @@
   ? {o info filter methods} ""
 
   ? {lsort [o info object methods]} "f foo"
-  ? {lsort [o info]} "valid submethods of ::o info: children class filter has info lookup method methods mixin name object parameter parent precedence variable vars"
+  ? {lsort [o info]} "valid submethods of ::o info: children class filter has info lookup method methods mixin name object parameter parent precedence slots variable vars"
 }