DeviceWorkstation.st
changeset 2867 482df0fb4034
parent 2866 8774c96b5bc0
child 2869 0f9e9dcfd2ee
--- a/DeviceWorkstation.st	Tue Aug 24 01:15:48 1999 +0200
+++ b/DeviceWorkstation.st	Tue Aug 24 01:16:31 1999 +0200
@@ -4597,6 +4597,11 @@
     buttonTranslation := ButtonTranslation.
     multiClickTimeDelta := MultiClickTimeDelta.
 
+    shiftDown := false.
+    ctrlDown := false.
+    metaDown := false.
+    altDown := false.
+
     self initializeModifierMappings
 
 
@@ -6513,6 +6518,6 @@
 !DeviceWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.321 1999-08-23 23:15:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.322 1999-08-23 23:16:31 cg Exp $'
 ! !
 DeviceWorkstation initialize!