Posted to tcl by mjanssen at Thu Jun 19 20:03:12 GMT 2008view pretty

oo::class create A  {method a {} {puts actionA}}
oo::class create AM {
	method a {} {puts actionAM ; next}
}
oo::define A mixin AM
A create a
% a a
ActionA
% a b
mmh
%
# where did actionAM go? Mixins should be called before the instance methods. If this would be the case. Silently nooping next would not be need