focusEvents do not count as userEvents
authorca
Wed, 12 Feb 1997 01:21:23 +0100
changeset 1330 fa27e219a425
parent 1329 4cc65306f73f
child 1331 bc6f96de5305
focusEvents do not count as userEvents (which are ignored when modalBox is open)
WEvent.st
WindowEvent.st
--- a/WEvent.st	Wed Feb 12 01:19:50 1997 +0100
+++ b/WEvent.st	Wed Feb 12 01:21:23 1997 +0100
@@ -490,9 +490,6 @@
     (type == #buttonMultiPress:x:y:) ifTrue:[^ true].
     (type == #buttonMotion:x:y:) ifTrue:[^ true].
 
-    (type == #pointerEnter:x:y:) ifTrue:[^ true].
-    (type == #pointerLeave:view:) ifTrue:[^ true].
-
     (type == #keyPress:x:y:) ifTrue:[^ true].
     (type == #keyRelease:x:y:) ifTrue:[^ true].
 
@@ -528,5 +525,5 @@
 !WindowEvent class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/WEvent.st,v 1.30 1997-01-29 13:17:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/WEvent.st,v 1.31 1997-02-12 00:21:23 ca Exp $'
 ! !
--- a/WindowEvent.st	Wed Feb 12 01:19:50 1997 +0100
+++ b/WindowEvent.st	Wed Feb 12 01:21:23 1997 +0100
@@ -490,9 +490,6 @@
     (type == #buttonMultiPress:x:y:) ifTrue:[^ true].
     (type == #buttonMotion:x:y:) ifTrue:[^ true].
 
-    (type == #pointerEnter:x:y:) ifTrue:[^ true].
-    (type == #pointerLeave:view:) ifTrue:[^ true].
-
     (type == #keyPress:x:y:) ifTrue:[^ true].
     (type == #keyRelease:x:y:) ifTrue:[^ true].
 
@@ -528,5 +525,5 @@
 !WindowEvent class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WindowEvent.st,v 1.30 1997-01-29 13:17:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WindowEvent.st,v 1.31 1997-02-12 00:21:23 ca Exp $'
 ! !