--- a/ObjectView.st	Fri Sep 17 15:54:09 2004 +0200
+++ b/ObjectView.st	Fri Sep 17 23:37:11 2004 +0200
@@ -1345,12 +1345,13 @@
     ]
 !
 
-buttonMotion:buttonMask x:buttX y:buttY
+buttonMotion:buttonState x:buttX y:buttY
     "user moved mouse while button pressed"
 
     |xpos ypos movePoint limitW limitH|
 
     "is it the select or 1-button ?"
+    buttonState == 0 ifTrue:[^ self].
     self sensor leftButtonPressed ifFalse:[^ self].
 
     lastButt notNil ifTrue:[
@@ -1392,7 +1393,7 @@
         ].
         lastButt := movePoint
     ].
-    super buttonMotion:buttonMask x:buttX y:buttY
+    super buttonMotion:buttonState x:buttX y:buttY
 
     "Modified: / 28.7.1998 / 16:01:31 / cg"
 !
@@ -3359,5 +3360,5 @@
 !ObjectView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.104 2004-07-02 09:10:31 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.105 2004-09-17 21:37:11 cg Exp $'
 ! !