--- a/Scroller.st	Wed Sep 09 22:35:43 1998 +0200
+++ b/Scroller.st	Fri Sep 11 15:55:32 1998 +0200
@@ -1507,13 +1507,15 @@
      redraw thumb if enteredColor ~~ thumbColor"
 
     (entered and:[(state bitAnd:(device anyButtonMotionMask)) == 0]) ifTrue: [
-	entered := false.
-	self invalidate.
-	"/ self drawThumb
+        entered := false.
+        thumbEnteredColor ~= thumbColor ifTrue:[
+            self invalidate.
+            "/ self drawThumb
+        ]
     ].
 
-    "Created: 6.3.1996 / 17:31:16 / cg"
-    "Modified: 10.6.1996 / 14:01:33 / cg"
+    "Created: / 6.3.1996 / 17:31:16 / cg"
+    "Modified: / 11.9.1998 / 00:13:53 / cg"
 !
 
 redraw
@@ -2218,5 +2220,5 @@
 !Scroller class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.108 1998-09-08 20:30:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.109 1998-09-11 13:55:32 cg Exp $'
 ! !