ObjectView.st
changeset 3916 73162fbd69c1
parent 3889 da959fe6f990
child 3951 1726c8891c34
--- 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 $'
 ! !