--- a/Button.st Wed Oct 05 16:10:30 2011 +0200
+++ b/Button.st Wed Oct 05 16:10:51 2011 +0200
@@ -1776,8 +1776,6 @@
super initStyle.
-"/ DefaultFont notNil ifTrue:[font := DefaultFont on:device].
-
DefaultBorderWidth notNil ifTrue:[self borderWidth: DefaultBorderWidth].
DefaultForegroundColor notNil ifTrue:[fgColor := DefaultForegroundColor].
DefaultBackgroundColor notNil ifTrue:[bgColor := DefaultBackgroundColor].
@@ -1902,7 +1900,8 @@
"/ self border:(RoundButtonBorder width:2 color:Color grey).
"/ ].
- "Modified: / 20.8.1998 / 12:07:37 / cg"
+ "Modified: / 20-08-1998 / 12:07:37 / cg"
+ "Modified (comment): / 05-10-2011 / 15:51:19 / az"
!
initialize
@@ -2311,9 +2310,9 @@
!Button class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.151 2010-10-22 13:55:09 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.152 2011-10-05 14:10:51 az Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.151 2010-10-22 13:55:09 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.152 2011-10-05 14:10:51 az Exp $'
! !