--- a/Scroller.st	Fri Oct 09 16:14:40 1998 +0200
+++ b/Scroller.st	Wed Oct 14 18:18:11 1998 +0200
@@ -1502,6 +1502,20 @@
     "Created: 23.10.1997 / 03:58:25 / cg"
 !
 
+pointerEnter:state x:x y:y
+    "mouse-button left view
+     redraw thumb if enteredColor ~~ thumbColor"
+
+    scrolling ifTrue:[
+        (state bitAnd:(device anyButtonMotionMask)) == 0 ifTrue: [
+            self buttonRelease:1 x:x y:y
+        ].
+    ].
+    super pointerEnter:state x:x y:y
+
+    "Modified: / 14.10.1998 / 15:40:51 / cg"
+!
+
 pointerLeave:state
     "mouse-button left view
      redraw thumb if enteredColor ~~ thumbColor"
@@ -2220,5 +2234,5 @@
 !Scroller class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.109 1998-09-11 13:55:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.110 1998-10-14 16:18:11 cg Exp $'
 ! !