# HG changeset patch
# User ca
# Date 1033494503 -7200
# Node ID 1da5501b1248fe102d1def0f36460bd9d2b0b339
# Parent  988ca38e0cd6272bd1697aef2136663f106e6238
bug fix in focus handling

diff -r 988ca38e0cd6 -r 1da5501b1248 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 $'
 ! !