--- a/Button.st	Tue Dec 02 19:19:38 2014 +0100
+++ b/Button.st	Tue Dec 02 19:35:49 2014 +0100
@@ -1767,6 +1767,10 @@
     "Modified: 15.2.1997 / 17:14:16 / cg"
 !
 
+initBorderStyle
+    DefaultBorderWidth notNil ifTrue:[ self borderWidth: DefaultBorderWidth].
+!
+
 initCursor
     "set up a hand cursor"
 
@@ -1788,7 +1792,7 @@
     super initStyle.
     graphicsDevice := self graphicsDevice.
 
-    DefaultBorderWidth notNil ifTrue:[self borderWidth: DefaultBorderWidth].
+    DefaultBorderWidth notNil ifTrue:[ self borderWidth: DefaultBorderWidth].
     DefaultForegroundColor notNil ifTrue:[fgColor := DefaultForegroundColor].
     DefaultBackgroundColor notNil ifTrue:[bgColor := DefaultBackgroundColor].
 
@@ -2316,10 +2320,10 @@
 !Button class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.160 2014-12-02 18:18:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.161 2014-12-02 18:35:49 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.160 2014-12-02 18:18:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.161 2014-12-02 18:35:49 cg Exp $'
 ! !