--- a/DeviceWorkstation.st	Thu Oct 28 17:30:00 1999 +0200
+++ b/DeviceWorkstation.st	Thu Oct 28 20:14:18 1999 +0200
@@ -2305,6 +2305,12 @@
 
 !DeviceWorkstation methodsFor:'accessing misc'!
 
+defaultEventMask
+    "return a mask to enable some events by default."
+
+    self subclassResponsibility
+!
+
 displayName
     "return the display name - that is the name of the display connection
      or nil, for default display. For example, in X, this returns a string
@@ -6759,6 +6765,6 @@
 !DeviceWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.344 1999-10-27 13:30:53 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.345 1999-10-28 18:14:18 cg Exp $'
 ! !
 DeviceWorkstation initialize!