--- a/DisplaySurface.st Sat Mar 20 00:09:34 1999 +0100
+++ b/DisplaySurface.st Sun Mar 21 18:55:06 1999 +0100
@@ -1118,10 +1118,11 @@
the focusView (0 @ 0) is passed as x/y coordinates.
"
(focusView notNil
- and:[isKeyEvent]) ifTrue:[
+ and:[isKeyEvent
+ and:[self ~~ focusView]]) ifTrue:[
focusView
dispatchEvent:type
- arguments:(Array with:(argArray at:1) with:0 with:0)
+ arguments:(Array with:(argArray at:1) with:-1 with:-1)
withFocusOn:nil
delegate:doDelegate.
^ self
@@ -2117,5 +2118,5 @@
!DisplaySurface class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/DisplaySurface.st,v 1.56 1999-03-15 10:56:02 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/DisplaySurface.st,v 1.57 1999-03-21 17:54:38 cg Exp $'
! !