# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 898357022 -7200
# Node ID 40af522dda864721117e00dc171c7dfb7fe3e31c
# Parent  205a6cad1ae3a3b090e61bc34d0a0fba9f186f4c
*** empty log message ***

diff -r 205a6cad1ae3 -r 40af522dda86 TerminalView.st
--- a/TerminalView.st	Sat Jun 20 17:35:33 1998 +0200
+++ b/TerminalView.st	Sat Jun 20 17:37:02 1998 +0200
@@ -538,6 +538,7 @@
     insertMode := false.
     alwaysAppendAtEnd := false.
     collectSize := 100.
+    sevenBit := true.
 
     numberOfColumns := 80.
     numberOfLines := 25.
@@ -554,7 +555,7 @@
      VT100TerminalView openShell
     "
 
-    "Modified: / 13.6.1998 / 13:58:13 / cg"
+    "Modified: / 20.6.1998 / 17:35:55 / cg"
 !
 
 initializeKeyboardMap
@@ -850,5 +851,5 @@
 !TerminalView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.40 1998-06-20 15:35:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.41 1998-06-20 15:36:44 cg Exp $'
 ! !
diff -r 205a6cad1ae3 -r 40af522dda86 VT100TerminalView.st
--- a/VT100TerminalView.st	Sat Jun 20 17:35:33 1998 +0200
+++ b/VT100TerminalView.st	Sat Jun 20 17:37:02 1998 +0200
@@ -31,11 +31,11 @@
              #Escape      '\e'
              #BackSpace   '\b'
              #Return      '\r'
-             #Delete      '\0377'
+             #Delete      '\0177'
          )
 
-    "Modified: / 10.6.1998 / 14:19:27 / cg"
     "Created: / 10.6.1998 / 15:13:01 / cg"
+    "Modified: / 20.6.1998 / 17:36:33 / cg"
 ! !
 
 !VT100TerminalView methodsFor:'functions'!
@@ -471,5 +471,5 @@
 !VT100TerminalView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/VT100TerminalView.st,v 1.15 1998-06-13 16:19:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/VT100TerminalView.st,v 1.16 1998-06-20 15:36:52 cg Exp $'
 ! !
diff -r 205a6cad1ae3 -r 40af522dda86 VT52TerminalView.st
--- a/VT52TerminalView.st	Sat Jun 20 17:35:33 1998 +0200
+++ b/VT52TerminalView.st	Sat Jun 20 17:37:02 1998 +0200
@@ -30,10 +30,10 @@
              #Escape      '\e'
              #BackSpace   '\b'
              #Return      '\r'
-             #Delete      '\0377'
+             #Delete      '\0177'
          )
 
-    "Modified: / 10.6.1998 / 14:19:27 / cg"
+    "Modified: / 20.6.1998 / 17:36:39 / cg"
 ! !
 
 !VT52TerminalView methodsFor:'events'!
@@ -210,5 +210,5 @@
 !VT52TerminalView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/VT52TerminalView.st,v 1.7 1998-06-13 16:19:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/VT52TerminalView.st,v 1.8 1998-06-20 15:37:02 cg Exp $'
 ! !