--- a/VT52TerminalView.st Wed Nov 06 16:41:48 2013 +0100
+++ b/VT52TerminalView.st Mon Nov 25 00:13:04 2013 +0100
@@ -107,7 +107,7 @@
!VT52TerminalView methodsFor:'processing - input'!
-processCharacter:char
+nextPut:char
"process a character (i.e. the shells output)"
Debug ifTrue:[
@@ -119,7 +119,7 @@
char == Character nl ifTrue:[
"/ cr-nl
"/ stay in buffering mode.
- self nextPut:Character cr.
+ super cr.
^ self.
].
self endEntry.
@@ -167,7 +167,7 @@
^ self.
]
].
- ^ self nextPut:char
+ ^ self show:char
].
state == #gotESC ifTrue:[
@@ -268,6 +268,6 @@
!VT52TerminalView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/VT52TerminalView.st,v 1.19 2013-07-23 14:00:16 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/VT52TerminalView.st,v 1.20 2013-11-24 23:13:04 cg Exp $'
! !