checkin from browser
authorClaus Gittinger <cg@exept.de>
Wed, 20 Mar 1996 17:04:13 +0100
changeset 533 ebc16cbb45fa
parent 532 ec41a5862bab
child 534 ae5caa947d14
checkin from browser
DevWorkst.st
DeviceWorkstation.st
--- a/DevWorkst.st	Wed Mar 20 16:43:15 1996 +0100
+++ b/DevWorkst.st	Wed Mar 20 17:04:13 1996 +0100
@@ -3386,11 +3386,11 @@
     |t modifiers|
 
     key == #Alt ifTrue:[
-	modifiers := altModifiers
+        modifiers := altModifiers
     ] ifFalse:[
-	key == #Cmd ifTrue:[
-	    modifiers := metaModifiers
-	]
+        key == #Cmd ifTrue:[
+            modifiers := metaModifiers
+        ]
     ].
     (modifiers size > 0) ifTrue:[
         t := modifiers first.
@@ -3402,7 +3402,7 @@
     ^ key
 
     "Created: 28.2.1996 / 17:07:08 / cg"
-    "Modified: 28.2.1996 / 17:10:54 / cg"
+    "Modified: 20.3.1996 / 17:03:39 / cg"
 !
 
 modifierKeyTranslationFor:untranslatedKey
@@ -3982,6 +3982,6 @@
 !DeviceWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/DevWorkst.st,v 1.78 1996-03-20 15:43:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/DevWorkst.st,v 1.79 1996-03-20 16:04:13 cg Exp $'
 ! !
 DeviceWorkstation initialize!
--- a/DeviceWorkstation.st	Wed Mar 20 16:43:15 1996 +0100
+++ b/DeviceWorkstation.st	Wed Mar 20 17:04:13 1996 +0100
@@ -3386,11 +3386,11 @@
     |t modifiers|
 
     key == #Alt ifTrue:[
-	modifiers := altModifiers
+        modifiers := altModifiers
     ] ifFalse:[
-	key == #Cmd ifTrue:[
-	    modifiers := metaModifiers
-	]
+        key == #Cmd ifTrue:[
+            modifiers := metaModifiers
+        ]
     ].
     (modifiers size > 0) ifTrue:[
         t := modifiers first.
@@ -3402,7 +3402,7 @@
     ^ key
 
     "Created: 28.2.1996 / 17:07:08 / cg"
-    "Modified: 28.2.1996 / 17:10:54 / cg"
+    "Modified: 20.3.1996 / 17:03:39 / cg"
 !
 
 modifierKeyTranslationFor:untranslatedKey
@@ -3982,6 +3982,6 @@
 !DeviceWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.78 1996-03-20 15:43:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.79 1996-03-20 16:04:13 cg Exp $'
 ! !
 DeviceWorkstation initialize!