--- a/MacButtonBorder.st	Mon Oct 05 10:56:05 2015 +0200
+++ b/MacButtonBorder.st	Mon Oct 05 10:58:28 2015 +0200
@@ -5,8 +5,7 @@
 "{ NameSpace: Smalltalk }"
 
 AbstractBorder subclass:#MacButtonBorder
-	instanceVariableNames:'topLeftEdge topRightEdge bottomLeftEdge bottomRightEdge
-		viewBackgroundColor'
+	instanceVariableNames:'topLeftEdge topRightEdge bottomLeftEdge bottomRightEdge'
 	classVariableNames:'TopLeftEdge TopRightEdge BottomLeftEdge BottomRightEdge'
 	poolDictionaries:''
 	category:'Graphics-Support'
@@ -113,17 +112,6 @@
 !
 
 backgroundColor2:aColor
-!
-
-viewBackgroundColor
-    ^ viewBackgroundColor
-!
-
-viewBackgroundColor:aColor
-    viewBackgroundColor ~= aColor ifTrue:[
-        viewBackgroundColor := aColor.
-        topLeftEdge := topRightEdge := bottomLeftEdge := bottomRightEdge := nil.
-    ].
 ! !
 
 !MacButtonBorder methodsFor:'displaying'!