Index: generic/predefined.xotcl =================================================================== diff -u -r217d826e64107056ae97176552cae3c776991b9e -r98250df246d466fa544dd4aa10e0f5028f5883e7 --- generic/predefined.xotcl (.../predefined.xotcl) (revision 217d826e64107056ae97176552cae3c776991b9e) +++ generic/predefined.xotcl (.../predefined.xotcl) (revision 98250df246d466fa544dd4aa10e0f5028f5883e7) @@ -112,7 +112,7 @@ .method info {obj} { set methods [list] - foreach name [::xotcl::dispatch [self] ::xotcl::cmd::ObjectInfo::methods [self] -defined] { + foreach name [::xotcl::cmd::ObjectInfo::methods [self] -defined] { if {$name eq "unknown"} continue lappend methods $name } @@ -292,7 +292,7 @@ if {[info exists default]} { # checking subclasses is not required during bootstrap # todo: do we really need $class twice? - foreach i [::xotcl::dispatch $class ::xotcl::cmd::ClassInfo::instances $class] { + foreach i [::xotcl::cmd::ClassInfo::instances $class] { if {![$i exists $att]} { if {[string match {*[*]*} $default]} { #set default [$i eval subst $default]