diff -r 737e276852c8 -r 73162fbd69c1 ObjectView.st --- a/ObjectView.st Tue Sep 15 20:20:55 2009 +0200 +++ b/ObjectView.st Tue Sep 15 20:21:26 2009 +0200 @@ -1484,7 +1484,7 @@ buttonMultiPress:button x:x y:y "user pressed left button twice (or more)" - ((button == 1) or:[button == #select]) ifTrue:[ + (button == 1) ifTrue:[ doublePressAction notNil ifTrue:[ doublePressAction value:(x @ y). ^ self @@ -1500,7 +1500,7 @@ |sensor| - ((button == 1) or:[button == #select]) ifTrue:[ + (button == 1) ifTrue:[ lastButt := x @ y. buttonPressTime := Timestamp now. sensor := self sensor. @@ -1524,7 +1524,7 @@ buttonRelease:button x:x y:y inMotion := false. - ((button == 1) or:[button == #select]) ifTrue:[ + (button == 1) ifTrue:[ releaseAction notNil ifTrue:[ releaseAction value. ^ self @@ -3511,5 +3511,5 @@ !ObjectView class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.131 2009-05-18 13:51:18 cg Exp $' + ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.132 2009-09-15 18:21:26 cg Exp $' ! !