--- a/VT100TerminalView.st Sat Nov 02 01:26:10 2019 +0100
+++ b/VT100TerminalView.st Fri Nov 08 20:41:43 2019 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1998 by eXept Software AG
All Rights Reserved
@@ -633,14 +631,16 @@
"/ report terminal type
self endEntry.
Debug ifTrue:[ Transcript showCR:'report terminal type'].
- inStream nextPut:(Character esc).
- inStream nextPut:$[.
- inStream nextPut:$?.
- inStream nextPut:$1.
- inStream nextPut:$;.
- inStream nextPut:$1.
- inStream nextPut:$0.
- inStream nextPut:$c.
+ inStream notNil ifTrue:[
+ inStream nextPut:(Character esc).
+ inStream nextPut:$[.
+ inStream nextPut:$?.
+ inStream nextPut:$1.
+ inStream nextPut:$;.
+ inStream nextPut:$1.
+ inStream nextPut:$0.
+ inStream nextPut:$c.
+ ].
^ self
].