--- a/NoteBookView.st	Wed Nov 28 15:43:10 2007 +0100
+++ b/NoteBookView.st	Wed Nov 28 17:58:40 2007 +0100
@@ -655,9 +655,11 @@
         activeBackgroundColor := backgroundColor.
 
         backgroundColor brightness < 0.5 ifTrue:[
-            foregroundColor := Color white
+            foregroundColor := Color white.
+            disabledForegroundColor := Color veryLightGray.
         ] ifFalse:[
             foregroundColor := Color black.
+            disabledForegroundColor := backgroundColor darker.
         ].
         activeForegroundColor := foregroundColor.
     ].
@@ -3572,5 +3574,5 @@
 !NoteBookView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.136 2007-11-28 12:49:17 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.137 2007-11-28 16:58:40 ca Exp $'
 ! !