TabWidget.st
changeset 670 6aefa9b9705c
parent 551 b9d3ddbc3365
child 697 e93da973b635
--- a/TabWidget.st	Tue Jan 20 19:13:22 1998 +0100
+++ b/TabWidget.st	Tue Jan 20 20:00:34 1998 +0100
@@ -382,7 +382,7 @@
 setLabelColor
     "set the label color dependant on the enabled state of the tabView
     "
-    tabView isEnabled ifTrue:[
+    (tabView isTabSelectable:self) ifTrue:[
         tabView paintColor:#labelColor.
     ] ifFalse:[
         tabView paintColor:#shadowColorUnselected.
@@ -998,5 +998,5 @@
 !TabWidget class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/TabWidget.st,v 1.12 1997-10-11 12:20:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/TabWidget.st,v 1.13 1998-01-20 19:00:34 ca Exp $'
 ! !