--- a/DiffTextView.st	Sun Jan 26 14:54:14 2014 +0100
+++ b/DiffTextView.st	Sun Jan 26 14:57:19 2014 +0100
@@ -606,6 +606,7 @@
                             ].
                             e size > 0 ifTrue:[
                                 clr := Text extractEmphasis:#backgroundColor from:(e at:1).
+                                (clr brightness > 0.5) ifTrue:[ clr := clr darkened ].
                                 thumb paint:clr.
                                 yThumb := (thumb height * (lineNr / overAllHeight)) rounded.
                                 thumb displayLineFromX:1 y:yThumb toX:thumb width-2 y:yThumb.
@@ -620,10 +621,10 @@
 !DiffTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.59 2014-01-26 13:54:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.60 2014-01-26 13:57:19 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.59 2014-01-26 13:54:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.60 2014-01-26 13:57:19 cg Exp $'
 ! !