Label.st
changeset 1872 08c4b4a2c65f
parent 1867 d27de2b0705c
child 1891 35657ac662fc
--- 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 $'
 ! !