Index: doc/example-scripts/ruby-mixins.tcl =================================================================== diff -u -r3cbf24ff95e38976cdc905ec0e8014d9d754ad6f -r275da34d3d7a874a451eced58242b738c8a37d1a --- doc/example-scripts/ruby-mixins.tcl (.../ruby-mixins.tcl) (revision 3cbf24ff95e38976cdc905ec0e8014d9d754ad6f) +++ doc/example-scripts/ruby-mixins.tcl (.../ruby-mixins.tcl) (revision 275da34d3d7a874a451eced58242b738c8a37d1a) @@ -32,7 +32,7 @@ nx::Class eval { :protected method module {name:class} { - nsf::relation::set [self] superclass [concat $name [:info superclass]] + nsf::relation::set [self] superclass [concat $name [:info superclasses]] } } @@ -124,14 +124,14 @@ # the precedence list. A decorator is able to modify the behavior of # all of the methods of the class, where it is mixed into. -? {g1 object mixin set Mix} "::Mix" +? {g1 object mixins set Mix} "::Mix" ? {g1 info precedence} "::Mix ::Group ::Enumerable ::nx::Object" ? {g1 count} {alpha 3 omega} # For the time being, remove the mixin class again. -? {g1 object mixin set ""} "" +? {g1 object mixins set ""} "" ? {g1 info precedence} "::Group ::Enumerable ::nx::Object" # @@ -213,7 +213,7 @@ # and decorates the instances of +ATeam+ as well the instances of its # specializations (like e.g. +SpecialForce+). -? {ATeam mixin set Mix} "::Mix" +? {ATeam mixins set Mix} "::Mix" ? {s1 info precedence} "::Mix ::SpecialForce ::ATeam ::Enumerable ::nx::Object"