bug fix in focus handling
authorca
Tue, 01 Oct 2002 19:48:23 +0200
changeset 2237 1da5501b1248
parent 2236 988ca38e0cd6
child 2238 68ecae98bcd2
bug fix in focus handling
DSVColumnView.st
--- a/DSVColumnView.st	Tue Oct 01 15:53:37 2002 +0200
+++ b/DSVColumnView.st	Tue Oct 01 19:48:23 2002 +0200
@@ -2327,6 +2327,8 @@
 
     |pref|
 
+    editView ifNotNil:[^ false].
+
     pref := UserPreferences current focusFollowsMouse.
     (pref ~~ false
     and:[(styleSheet at:#'selection.requestFocusOnPointerEnter' default:true)
@@ -3332,7 +3334,8 @@
     ifTrue:[
         p := device translatePoint:aPoint fromView:self toView:v.
         "/ simulate clicking into the editor
-        self sensor pushEvent:(WindowEvent buttonPress:#select x:p x y:p y view:v)
+        self sensor pushEvent:(WindowEvent buttonPress:#select x:p x y:p y view:v).
+        self sensor pushEvent:(WindowEvent buttonRelease:#select x:p x y:p y view:v)
     ].
 !
 
@@ -3620,5 +3623,5 @@
 !DSVColumnView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.147 2002-09-27 12:09:42 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.148 2002-10-01 17:48:23 ca Exp $'
 ! !