Index: library/nx/nx.tcl
===================================================================
diff -u -r65abda7763aa24fe8a33728195cc3043d06ee660 -rf044ef96d08570d2c4f5c82ce19f839c5ee2ca3b
--- library/nx/nx.tcl	(.../nx.tcl)	(revision 65abda7763aa24fe8a33728195cc3043d06ee660)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision f044ef96d08570d2c4f5c82ce19f839c5ee2ca3b)
@@ -492,10 +492,10 @@
     :alias "info mixin classes"    ::nsf::methods::object::info::mixinclasses
     :alias "info parent"           ::nsf::methods::object::info::parent
     :alias "info precedence"       ::nsf::methods::object::info::precedence
-    :method "info slots" {} {
+    :method "info slots" {{-type ::nx::Slot}} {
       set slotContainer [::nsf::self]::slot
       if {[::nsf::isobject $slotContainer]} {
-	::nsf::dispatch $slotContainer ::nsf::methods::object::info::children -type ::nx::Slot
+	::nsf::dispatch $slotContainer ::nsf::methods::object::info::children -type $type
       }
     }
     :alias "info vars"           ::nsf::methods::object::info::vars