class: VT100TerminalView
authorClaus Gittinger <cg@exept.de>
Sat, 10 Aug 2013 00:53:16 +0200
changeset 4320 93def4b90865
parent 4319 83b76f13ddc3
child 4321 4803ecdf9a7a
class: VT100TerminalView changed: #processStateGotReturn: fix forgotten character after return (w.o. newline)
VT100TerminalView.st
--- a/VT100TerminalView.st	Wed Aug 07 10:32:15 2013 +0200
+++ b/VT100TerminalView.st	Sat Aug 10 00:53:16 2013 +0200
@@ -1200,12 +1200,13 @@
 
     self endEntry.
     self cursorToBeginOfLine.
-
-    (char == Character esc) ifTrue:[
-        state := #gotESC.
-    ].
-    "/ continue in initial state
-    ^ #waitForNextChar
+    ^ self processState0: char.
+"/
+"/    (char == Character esc) ifTrue:[
+"/        state := #gotESC.
+"/    ].
+"/    "/ continue in initial state
+"/    ^ #waitForNextChar
 !
 
 processStateGotXTERMCSI2:char
@@ -1272,10 +1273,10 @@
 !VT100TerminalView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/VT100TerminalView.st,v 1.58 2013-07-24 19:58:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/VT100TerminalView.st,v 1.59 2013-08-09 22:53:16 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/VT100TerminalView.st,v 1.58 2013-07-24 19:58:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/VT100TerminalView.st,v 1.59 2013-08-09 22:53:16 cg Exp $'
 ! !