--- a/VariablePanelController.st	Tue Aug 21 17:52:40 2001 +0200
+++ b/VariablePanelController.st	Fri Aug 24 17:11:26 2001 +0200
@@ -87,8 +87,17 @@
         ].
         ^ self
     ].
+
     (movedHandle isNil or:[resizeMode isNil]) ifTrue:[^ self].
 
+    "/ kludge: workaround Windows bug, which sends a MOUSEMOVE
+    "/ (with same coordinate as previous MOUSE_DOWN
+    view orientation ~~ #vertical ifTrue:[
+        clickPos == bx ifTrue:[^ self].
+    ] ifFalse:[
+        clickPos == by ifTrue:[^ self].
+    ].
+
     "RESIZING"
 
     "compute new position ...."
@@ -128,6 +137,8 @@
     ] ifTrue:[
         self doResize.
     ].
+
+    "Modified: / 24.8.2001 / 15:34:57 / cg"
 !
 
 buttonPress:button x:bx y:by
@@ -142,6 +153,7 @@
         ].
         ^ self.
     ].
+
     hindex := self detectHandleIndexAt:bx y:by.
 
     movedHandle notNil ifTrue:[
@@ -184,6 +196,8 @@
         ].
         view drawSnapAt:movedHandle
     ]
+
+    "Modified: / 24.8.2001 / 15:35:27 / cg"
 !
 
 buttonRelease:button x:bx y:by
@@ -221,6 +235,8 @@
     ].
     self pointerLeave:0.
     self pointerEnter:0 x:bx y:by.      "check whether mouse on a handle"
+
+    "Modified: / 24.8.2001 / 15:35:33 / cg"
 !
 
 pointerEnter:state x:bx y:by
@@ -506,7 +522,7 @@
 !VariablePanelController class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanelController.st,v 1.33 2000-09-27 14:23:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanelController.st,v 1.34 2001-08-24 15:11:26 cg Exp $'
 
 
 ! !