changed: #buttonPress:x:y:
authorClaus Gittinger <cg@exept.de>
Thu, 05 Aug 2010 21:46:50 +0200
changeset 3923 d5c71ade2f43
parent 3922 fd141174f607
child 3924 72044fd3296a
changed: #buttonPress:x:y:
DSVColumnView.st
--- a/DSVColumnView.st	Thu Aug 05 20:58:12 2010 +0200
+++ b/DSVColumnView.st	Thu Aug 05 21:46:50 2010 +0200
@@ -2399,7 +2399,7 @@
         ].
         self selectRowAt:rowNr colAt:colNr atPoint:clickPoint openEditor:false.
 
-        UserPreferences current selectOnRightClick ifTrue:[
+        ((button == 2) and:[UserPreferences current selectOnRightClick]) ifTrue:[
             self selectRowAt:rowNr colAt:colNr atPoint:clickPoint openEditor:true 
         ] ifFalse:[
             buttonReleaseAction := 
@@ -2417,7 +2417,7 @@
         ^ self
     ].
 
-    UserPreferences current selectOnRightClick ifFalse:[
+    ((button == 2) and:[UserPreferences current selectOnRightClick]) ifFalse:[
         buttonReleaseAction := [
             self selectRowAt:rowNr colAt:colNr atPoint:clickPoint openEditor:true.
         ].
@@ -2466,7 +2466,7 @@
         ].
     ].
 
-    "Modified: / 05-08-2010 / 20:57:39 / cg"
+    "Modified: / 05-08-2010 / 21:46:27 / cg"
 !
 
 buttonRelease:button x:x y:y
@@ -4622,9 +4622,9 @@
 !DSVColumnView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.258 2010-08-05 18:58:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.259 2010-08-05 19:46:50 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.258 2010-08-05 18:58:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.259 2010-08-05 19:46:50 cg Exp $'
 ! !