Index: library/nx/nx.tcl =================================================================== diff -u -r8c3c5565c2904e379350494cd40675d1aad6a46c -re529093e5930cb5c9de2bc81cef3eca2585f154f --- library/nx/nx.tcl (.../nx.tcl) (revision 8c3c5565c2904e379350494cd40675d1aad6a46c) +++ library/nx/nx.tcl (.../nx.tcl) (revision e529093e5930cb5c9de2bc81cef3eca2585f154f) @@ -595,7 +595,7 @@ } return $result } - :method "info slot name" {{-type ::nx::Slot} -closure:switch -source:optional pattern:optional} { + :method "info slot names" {{-type ::nx::Slot} -closure:switch -source:optional pattern:optional} { set result {} foreach slot [::nsf::my ::nsf::methods::object::info::slotobjects {*}[current args]] { lappend result [$slot name] @@ -687,7 +687,7 @@ } return $result } - :method "info slot name" {{-type ::nx::Slot} -closure:switch -source:optional pattern:optional} { + :method "info slot names" {{-type ::nx::Slot} -closure:switch -source:optional pattern:optional} { set result {} foreach slot [::nsf::my ::nsf::methods::class::info::slotobjects {*}[current args]] { lappend result [$slot name]