--- a/ListView.st	Thu Feb 29 23:04:54 1996 +0100
+++ b/ListView.st	Fri Mar 01 13:54:27 1996 +0100
@@ -167,11 +167,19 @@
 !
 
 updateStyleCache
+    "extract values from the styleSheet and cache them in class variables"
+
+    <resource: #style (#textForegroundColor #textBackgroundColor
+                       #textTabPositions
+                       #textFont)>
+
     DefaultForegroundColor := StyleSheet colorAt:'textForegroundColor' default:Black.
     DefaultBackgroundColor := StyleSheet colorAt:'textBackgroundColor' default:White.
     DefaultFont := StyleSheet fontAt:'textFont'.
     DefaultTabPositions := StyleSheet at:'textTabPositions'.
     DefaultTabPositions isNil ifTrue:[DefaultTabPositions := self defaultTabPositions].
+
+    "Modified: 1.3.1996 / 13:45:34 / cg"
 ! !
 
 !ListView methodsFor:'accessing'!
@@ -2859,5 +2867,5 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.71 1996-02-28 18:46:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.72 1996-03-01 12:54:27 cg Exp $'
 ! !