--- a/VariablePanelController.st	Wed Sep 27 09:48:20 2000 +0200
+++ b/VariablePanelController.st	Wed Sep 27 16:23:30 2000 +0200
@@ -136,8 +136,11 @@
     |handleView hindex isMin isMax layout|
 
     ((button == 1) or:[button == #select]) ifFalse:[
-          self pointerLeave:0.
-        ^ super buttonPress:button x:bx y:by.
+        movedHandle isNil ifTrue:[
+            self pointerLeave:0.
+            super buttonPress:button x:bx y:by.
+        ].
+        ^ self.
     ].
     hindex := self detectHandleIndexAt:bx y:by.
 
@@ -189,8 +192,11 @@
     |subViews layout aboveView|
 
     ((button == 1) or:[button == #select]) ifFalse:[
-        resizeMode := nil.
-        ^ super buttonRelease:button x:bx y:by
+        movedHandle isNil ifTrue:[
+            resizeMode := nil.
+            super buttonRelease:button x:bx y:by
+        ].
+        ^ self.
     ].
 
     view ungrabPointer.
@@ -500,7 +506,7 @@
 !VariablePanelController class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanelController.st,v 1.32 2000-09-07 17:00:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanelController.st,v 1.33 2000-09-27 14:23:30 cg Exp $'
 
 
 ! !