--- a/ObjectView.st	Thu Aug 01 18:25:33 1996 +0200
+++ b/ObjectView.st	Thu Aug 01 19:14:04 1996 +0200
@@ -1235,11 +1235,11 @@
 buttonPress:button x:x y:y
     "user pressed left button"
 
-    self sensor shiftDown ifTrue:[
-        ^ self buttonShiftPress:button x:x y:y
-    ].
-
     ((button == 1) or:[button == #select]) ifTrue:[
+        self sensor shiftDown ifTrue:[
+            ^ self buttonShiftPress:button x:x y:y
+        ].
+
         pressAction notNil ifTrue:[
             lastButt := x @ y.
             pressAction value:lastButt.
@@ -1248,7 +1248,7 @@
     ].
     super buttonPress:button x:x y:y
 
-    "Modified: 1.8.1996 / 18:00:40 / cg"
+    "Modified: 1.8.1996 / 19:13:01 / cg"
 !
 
 buttonRelease:button x:x y:y
@@ -1266,16 +1266,13 @@
 buttonShiftPress:button x:x y:y
     "user pressed left button with shift"
 
-    ((button == 1) or:[button == #select]) ifTrue:[
-        shiftPressAction notNil ifTrue:[
-            lastButt := x @ y.
-            shiftPressAction value:lastButt.
-            ^ self
-        ]
-    ].
-    super buttonShiftPress:button x:x y:y
-
-    "Modified: 30.5.1996 / 17:57:20 / cg"
+    shiftPressAction notNil ifTrue:[
+        lastButt := x @ y.
+        shiftPressAction value:lastButt.
+        ^ self
+    ]
+
+    "Modified: 1.8.1996 / 19:13:19 / cg"
 !
 
 keyPress:key x:x y:y
@@ -2885,5 +2882,5 @@
 !ObjectView  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.49 1996-08-01 16:20:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.50 1996-08-01 17:14:04 cg Exp $'
 ! !