Index: library/nx/nx.tcl =================================================================== diff -u -r0f881e4bc45e927c8d84c1b1b468ef7537cb9b03 -r3016e6466668218392140bc884fa8bf489721eda --- library/nx/nx.tcl (.../nx.tcl) (revision 0f881e4bc45e927c8d84c1b1b468ef7537cb9b03) +++ library/nx/nx.tcl (.../nx.tcl) (revision 3016e6466668218392140bc884fa8bf489721eda) @@ -738,11 +738,10 @@ :alias "info has mixin" ::nsf::methods::object::info::hasmixin :alias "info has namespace" ::nsf::methods::object::info::hasnamespace :alias "info has type" ::nsf::methods::object::info::hastype - #:alias "info is" ::nsf::methods::object::info::is :alias "info name" ::nsf::methods::object::info::name - :alias "info object filters" ::nsf::methods::object::info::filtermethods + :alias "info object filters" ::nsf::methods::object::info::filters :alias "info object methods" ::nsf::methods::object::info::methods - :alias "info object mixins" ::nsf::methods::object::info::mixinclasses + :alias "info object mixins" ::nsf::methods::object::info::mixins :method "info object slots" {{-type:class ::nx::Slot} pattern:optional} { set method [list ::nsf::methods::object::info::slotobjects -type $type] if {[info exists pattern]} {lappend method $pattern} @@ -814,12 +813,12 @@ Class eval { :alias "info lookup" ::nx::Object::slot::__info::lookup - :alias "info filters" ::nsf::methods::class::info::filtermethods + :alias "info filters" ::nsf::methods::class::info::filters :alias "info has" ::nx::Object::slot::__info::has :alias "info heritage" ::nsf::methods::class::info::heritage :alias "info instances" ::nsf::methods::class::info::instances :alias "info methods" ::nsf::methods::class::info::methods - :alias "info mixins" ::nsf::methods::class::info::mixinclasses + :alias "info mixins" ::nsf::methods::class::info::mixins :alias "info mixinof" ::nsf::methods::class::info::mixinof :method "info slots" {{-type ::nx::Slot} -closure:switch -source:optional pattern:optional} {