Index: library/mongodb/nx-mongo.tcl =================================================================== diff -u -r275da34d3d7a874a451eced58242b738c8a37d1a -r0f881e4bc45e927c8d84c1b1b468ef7537cb9b03 --- library/mongodb/nx-mongo.tcl (.../nx-mongo.tcl) (revision 275da34d3d7a874a451eced58242b738c8a37d1a) +++ library/mongodb/nx-mongo.tcl (.../nx-mongo.tcl) (revision 0f881e4bc45e927c8d84c1b1b468ef7537cb9b03) @@ -417,7 +417,7 @@ # (eg. mongo type, or mongo operator). # :method "get slot" {att} { - set classes [concat [self] [:info mixin classes] [:info heritage]] + set classes [concat [self] [:info mixins] [:info heritage]] foreach cls $classes { set slot [$cls info slots $att] if {$slot ne ""} {