DSVColumnView.st
changeset 3988 b15a3ef546b7
parent 3986 163354e9ee4c
child 3989 5c6706e4e0d1
--- a/DSVColumnView.st	Thu Jan 20 08:17:40 2011 +0100
+++ b/DSVColumnView.st	Thu Jan 20 08:38:11 2011 +0100
@@ -34,14 +34,14 @@
 		cachedPreferredExtent'
 	classVariableNames:'DefaultForegroundColor DefaultBackgroundColor
 		DefaultHilightForegroundColor DefaultHilightBackgroundColor
-		ButtonLightColor ButtonShadowColor CheckToggleActiveImage
-		CheckTogglePassiveImage ButtonHalfLightColor
-		ButtonHalfShadowColor ButtonEdgeStyle CheckToggleForm
-		CheckToggleLevel CheckToggleExtent RadioButtonForm
-		RadioButtonLevel RadioButtonExtent ComboButtonForm
-		ComboButtonLevel ComboButtonExtent StopRedrawSignal
-		DragMotionDistance RadioButtonActiveImage RadioButtonPassiveImage
-		PreselectAllWhenOpeningEditor'
+		DefaultHilightFrameColor ButtonLightColor ButtonShadowColor
+		CheckToggleActiveImage CheckTogglePassiveImage
+		ButtonHalfLightColor ButtonHalfShadowColor ButtonEdgeStyle
+		CheckToggleForm CheckToggleLevel CheckToggleExtent
+		RadioButtonForm RadioButtonLevel RadioButtonExtent
+		ComboButtonForm ComboButtonLevel ComboButtonExtent
+		StopRedrawSignal DragMotionDistance RadioButtonActiveImage
+		RadioButtonPassiveImage PreselectAllWhenOpeningEditor'
 	poolDictionaries:''
 	category:'Views-DataSet'
 !
@@ -198,7 +198,9 @@
                        #'radioButton.activeImage'
                        #'radioButton.passiveImage'
                        #'selection.hilightForegroundColor'
-                       #'selection.hilightBackgroundColor'   )>
+                       #'selection.hilightBackgroundColor' 
+                       #'selection.hilightFrameColor'   
+    )>
 
     DefaultForegroundColor        := StyleSheet colorAt:#'textForegroundColor' default:(Color black).
     "/ DefaultBackgroundColor        := StyleSheet colorAt:#'scrollableView.backgroundColor' default:DefaultViewBackgroundColor.
@@ -206,6 +208,7 @@
 
     DefaultHilightForegroundColor := StyleSheet colorAt:#'selection.hilightForegroundColor' default:DefaultBackgroundColor.
     DefaultHilightBackgroundColor := StyleSheet colorAt:#'selection.hilightBackgroundColor' default:DefaultForegroundColor.
+    DefaultHilightFrameColor      := StyleSheet colorAt:#'selection.hilightFrameColor' default:DefaultHilightBackgroundColor.
 
     DefaultHilightForegroundColor = DefaultHilightBackgroundColor ifTrue:[
         DefaultHilightBackgroundColor := Color black
@@ -244,7 +247,7 @@
      self updateStyleCache.
     "
 
-    "Modified: / 19-01-2011 / 22:21:01 / cg"
+    "Modified: / 20-01-2011 / 08:36:59 / cg"
 !
 
 verticalSpacing
@@ -4639,9 +4642,9 @@
 !DSVColumnView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.265 2011-01-20 07:16:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.266 2011-01-20 07:38:11 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.265 2011-01-20 07:16:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.266 2011-01-20 07:38:11 cg Exp $'
 ! !