--- a/MacFlatButtonBorder.st	Tue Oct 06 16:10:02 2015 +0200
+++ b/MacFlatButtonBorder.st	Tue Oct 06 16:10:05 2015 +0200
@@ -176,6 +176,26 @@
     ^Icon
         constantNamed:'MacFlatButtonBorder topLeftImageUnfilledMasked5'
         ifAbsentPut:[(Depth2Image width:4 height:4) bits:(ByteArray fromPackedString:'HH<?O0@a') colorMapFromArray:#[183 183 183 201 201 201 224 224 224 255 255 255] mask:((ImageMask width:4 height:4) bits:(ByteArray fromPackedString:'\OC0<@@a'); yourself); yourself]
+!
+
+topLeftImageUnfilledMasked6
+    "This resource specification was automatically generated
+     by the ImageEditor of ST/X."
+
+    "Do not manually edit this!! If it is corrupted,
+     the ImageEditor may not be able to read the specification."
+
+    "
+     self topLeftImageUnfilledMasked6 inspect
+     ImageEditor openOnClass:self andSelector:#topLeftImageUnfilledMasked6
+     Icon flushCachedIcons
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:'MacFlatButtonBorder topLeftImageUnfilledMasked6'
+        ifAbsentPut:[(Depth2Image width:4 height:4) bits:(ByteArray fromPackedString:'@@<?O0@a') colorMapFromArray:#[183 183 183 201 201 201 224 224 224 255 255 255] mask:((ImageMask width:4 height:4) bits:(ByteArray fromPackedString:'LGC0<@@a'); yourself); yourself]
 ! !
 
 !MacFlatButtonBorder methodsFor:'accessing'!
@@ -243,7 +263,7 @@
         ].    
     ].    
 
-    aGC paint:(aGC viewBackground).
+    aGC paint:(aGC container viewBackground).
     aGC fillRectangleX:boxLeft y:boxTop width:2 height:2.
     aGC fillRectangleX:boxRight-2 y:boxTop width:2 height:2.
     aGC fillRectangleX:boxRight-2 y:boxBottom-2 width:2 height:2.
@@ -289,7 +309,7 @@
     light := color light.
     sat := color saturation.
 
-    protoImage := self class topLeftImageUnfilledMasked5.
+    protoImage := self class topLeftImageUnfilledMasked6.
     img := protoImage copy.
 
     img colorMap at:1 put:color.