--- a/Label.st Sat Apr 24 17:47:34 1999 +0200
+++ b/Label.st Sat Apr 24 18:05:42 1999 +0200
@@ -819,17 +819,17 @@
#foregroundColor #backgroundColor
#'label.font')>
- DefaultForegroundColor := StyleSheet colorAt:'label.foregroundColor'.
+ DefaultForegroundColor := StyleSheet colorAt:#'label.foregroundColor'.
DefaultForegroundColor isNil ifTrue:[
"/ fallBack: comon value
- DefaultForegroundColor := StyleSheet colorAt:'foregroundColor' default:Black.
+ DefaultForegroundColor := StyleSheet colorAt:#'foregroundColor' default:Black.
].
- DefaultBackgroundColor := StyleSheet colorAt:'label.backgroundColor'.
+ DefaultBackgroundColor := StyleSheet colorAt:#'label.backgroundColor'.
DefaultBackgroundColor isNil ifTrue:[
"/ fallBack: comon value
- DefaultBackgroundColor := StyleSheet colorAt:'backgroundColor'.
+ DefaultBackgroundColor := StyleSheet colorAt:#'backgroundColor'.
].
- DefaultFont := StyleSheet fontAt:'label.font'.
+ DefaultFont := StyleSheet fontAt:#'label.font'.
"
self updateStyleCache
@@ -1719,5 +1719,5 @@
!Label class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.99 1999-04-24 13:40:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.100 1999-04-24 16:05:42 cg Exp $'
! !