Index: tests/properties.test
===================================================================
diff -u -N -rd66258cafa0a21e1b10fa42951de7e71f63a1817 -rb0bfe3f3bf2e7fd2c14c58eeedca34b734803ecd
--- tests/properties.test	(.../properties.test)	(revision d66258cafa0a21e1b10fa42951de7e71f63a1817)
+++ tests/properties.test	(.../properties.test)	(revision b0bfe3f3bf2e7fd2c14c58eeedca34b734803ecd)
@@ -873,7 +873,53 @@
   ? {b1 configure -y 2} ""
 }
 
+nx::test case extend-class-mixin-info {
+  
+  nx::Class create Baz
+  nx::Class create Foo -mixin Baz
+  nx::Class create Bar -mixin Foo
+  Bar create bar; # cache becomes hot!
+  ? {llength [Bar info configure parameters]} 4
 
+  Foo property y
+  ? {llength [Bar info configure parameters]} 5
+
+  Baz property z
+  ? {llength [Bar info configure parameters]} 6
+
+  Baz delete property z
+  ? {llength [Bar info configure parameters]} 5
+
+  Foo delete property y
+  ? {llength [Bar info configure parameters]} 4
+
+}
+
+nx::test case extend-class-mixin-configure {
+  
+  nx::Class create Baz
+  nx::Class create Foo -mixin Baz
+  nx::Class create Bar -mixin Foo
+  Bar create bar; # cache becomes hot!
+
+  Foo property y
+  bar configure -y 1
+  ? {bar cget -y} 1
+
+  Baz property z
+  bar configure -z 2
+  ? {bar cget -z} 2
+  bar configure -y 3
+  ? {bar cget -y} 3
+
+  Bar property w
+  bar configure -w 4
+  ? {bar cget -w} 4
+
+}
+
+
+
 #
 # Local variables:
 #    mode: tcl