#UI_ENHANCEMENT
authorClaus Gittinger <cg@exept.de>
Thu, 31 Mar 2016 17:32:10 +0200
changeset 5617 5d91923f148e
parent 5615 881147bd562b
child 5618 6caed94c3cef
#UI_ENHANCEMENT class: ListView changed: #updateStyleCache tab setting is user- not style specific
ListView.st
--- a/ListView.st	Fri Mar 25 22:48:57 2016 +0100
+++ b/ListView.st	Thu Mar 31 17:32:10 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -476,18 +478,19 @@
     "extract values from the styleSheet and cache them in class variables"
 
     <resource: #style (#'text.foregroundColor' #'text.backgroundColor'
-		       #'text.tabPositions'
-		       #'text.font')>
+                       #'text.tabPositions'
+                       #'text.font')>
 
     DefaultForegroundColor := StyleSheet colorAt:'text.foregroundColor' default:Black.
     DefaultBackgroundColor := StyleSheet colorAt:'text.backgroundColor' default:White.
     DefaultFont := StyleSheet fontAt:'text.font'.
-    DefaultTabPositions := StyleSheet at:'text.tabPositions'.
-    DefaultTabPositions isNil ifTrue:[DefaultTabPositions := self defaultTabPositions].
+    "/ that's not style, but a personal setting
+    "/ DefaultTabPositions := StyleSheet at:'text.tabPositions'.
+    "/ DefaultTabPositions isNil ifTrue:[DefaultTabPositions := self defaultTabPositions].
     DefaultLeftMargin := 0.5.
     DefaultTopMargin := 0.5.
 
-    "Modified: 20.10.1997 / 15:05:30 / cg"
+    "Modified: / 31-03-2016 / 10:49:45 / cg"
 !
 
 userDefaultTabPositions