VT100TerminalView.st
changeset 6124 7bcfc51a71b7
parent 6123 864d5890f58e
child 6183 9370e384470b
--- a/VT100TerminalView.st	Mon Aug 26 23:19:55 2019 +0200
+++ b/VT100TerminalView.st	Tue Aug 27 00:00:19 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1998 by eXept Software AG
               All Rights Reserved
@@ -842,7 +844,8 @@
 !
 
 nextPut:char 
-    " process a character (i.e. from the shell's output)"
+    "process a character (i.e. from the shell's output)
+     Answer char."
 
     |processCharacterReturn|