Index: library/lib/xotcl1.xotcl =================================================================== diff -u -r5008260d12072f5542b81dfed2d512f906326e32 -r6b0cef2dbca601425c74c3ee586d15cfeab47b91 --- library/lib/xotcl1.xotcl (.../xotcl1.xotcl) (revision 5008260d12072f5542b81dfed2d512f906326e32) +++ library/lib/xotcl1.xotcl (.../xotcl1.xotcl) (revision 6b0cef2dbca601425c74c3ee586d15cfeab47b91) @@ -305,7 +305,7 @@ } foreach cmd [::info command ::xotcl::cmd::ClassInfo::*] { set cmdName [namespace tail $cmd] - if {$cmdName in [list "method" "methods" "mixin" "mixinguard"]} continue + if {$cmdName in [list "method" "methods" "filter" "mixin" "mixinguard"]} continue ::xotcl::alias ::xotcl::classInfo $cmdName $cmd } ::xotcl::alias ::xotcl::objectInfo is ::xotcl::is @@ -314,6 +314,7 @@ ::xotcl::alias ::xotcl::classInfo classchildren ::xotcl::cmd::ObjectInfo::children ::xotcl::alias ::xotcl::classInfo instmixin ::xotcl::cmd::ClassInfo::mixin ::xotcl::alias ::xotcl::classInfo instmixinguard ::xotcl::cmd::ClassInfo::mixinguard + ::xotcl::alias ::xotcl::classInfo instfilter ::xotcl::cmd::ClassInfo::filter # define info methods from objectInfo on classInfo as well ::xotcl::alias classInfo body objectInfo::body