--- a/VT100TerminalView.st	Tue Jul 23 11:17:06 2013 +0200
+++ b/VT100TerminalView.st	Tue Jul 23 14:16:30 2013 +0200
@@ -566,6 +566,11 @@
             show:' got: ';
             showCR:char storeString
     ].
+    state == 0 ifTrue:[
+        processCharacterReturn := self processState0:char.
+        self evaluateProcessCharacter:char return:processCharacterReturn.
+        ^ self
+    ].
     state == #gotReturn ifTrue:[
         processCharacterReturn := self processStateGotReturn:char.
         processCharacterReturn == #sequenceComplete ifTrue:[
@@ -574,11 +579,6 @@
         ].
         ^ self
     ].
-    state == 0 ifTrue:[
-        processCharacterReturn := self processState0:char.
-        self evaluateProcessCharacter:char return:processCharacterReturn.
-        ^ self
-    ].
     state == #gotESC ifTrue:[
         processCharacterReturn := self processStateGotESC:char.
         self evaluateProcessCharacter:char return:processCharacterReturn.
@@ -639,7 +639,7 @@
         ].
 
         (char == Character return) ifTrue:[
-true           " (rangeEndLine notNil and:[rangeEndLine ~~ numberOfLines])" ifTrue:[
+            true " (rangeEndLine notNil and:[rangeEndLine ~~ numberOfLines])" ifTrue:[
                 self endEntry.
                 self cursorToBeginOfLine.
             ] ifFalse:[
@@ -692,6 +692,7 @@
             ^ #waitForNextChar.
         ]
     ].
+    super nextPut:char.
     ^ nil
 !
 
@@ -1026,10 +1027,10 @@
 !VT100TerminalView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/VT100TerminalView.st,v 1.50 2013-07-21 10:43:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/VT100TerminalView.st,v 1.51 2013-07-23 12:16:30 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/VT100TerminalView.st,v 1.50 2013-07-21 10:43:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/VT100TerminalView.st,v 1.51 2013-07-23 12:16:30 cg Exp $'
 ! !