XWorkstation.st
changeset 125 d74e6ab7157a
parent 118 25e775072a89
child 129 752fbb07635a
--- a/XWorkstation.st	Sat Mar 25 23:17:13 1995 +0100
+++ b/XWorkstation.st	Sun Mar 26 22:14:10 1995 +0200
@@ -30,7 +30,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.36 1995-03-18 05:13:21 claus Exp $
+$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.37 1995-03-26 20:14:10 claus Exp $
 '!
 
 !XWorkstation class methodsFor:'documentation'!
@@ -51,7 +51,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.36 1995-03-18 05:13:21 claus Exp $
+$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.37 1995-03-26 20:14:10 claus Exp $
 "
 !
 
@@ -876,7 +876,7 @@
 
 %{  /* NOCONTEXT */
     RETURN (_MKSMALLINT( ExposureMask | StructureNotifyMask |
-			 KeyPressMask |
+			 KeyPressMask | EnterWindowMask | LeaveWindowMask |
 			 ButtonPressMask | ButtonMotionMask | ButtonReleaseMask ));
 %}
 !
@@ -1557,7 +1557,7 @@
 #ifdef OLD
     /* these may not be disabled */
     xswa.event_mask |= ExposureMask | StructureNotifyMask |
-		       KeyPressMask |
+		       KeyPressMask | EnterWindowMask | LeaveWindowMask |
 		       ButtonPressMask | ButtonMotionMask | ButtonReleaseMask;
 #endif