TerminalView.st
changeset 1017 8af14b2315fa
parent 1015 61f7ea3e5463
child 1021 c3963e925eb5
--- a/TerminalView.st	Mon Jul 27 14:01:54 1998 +0200
+++ b/TerminalView.st	Mon Jul 27 16:29:05 1998 +0200
@@ -298,7 +298,8 @@
 !
 
 defineWindowSize
-    inStream notNil ifTrue:[
+    (inStream notNil 
+    and:[inStream isExternalStream]) ifTrue:[
         (OperatingSystem 
             setWindowSizeOnFileDescriptor:(inStream fileDescriptor)
             width:(innerWidth // font width)
@@ -313,7 +314,7 @@
     ]
 
     "Created: / 11.6.1998 / 22:51:39 / cg"
-    "Modified: / 20.6.1998 / 20:29:13 / cg"
+    "Modified: / 27.7.1998 / 16:07:18 / cg"
 !
 
 keyPress:aKey x:x y:y
@@ -982,6 +983,12 @@
 
 !TerminalView methodsFor:'processing - input'!
 
+nextPutAll:aString
+    self processInput:aString n:aString size
+
+    "Created: / 27.7.1998 / 15:10:59 / cg"
+!
+
 processInput:buffer n:count
     |sensor|
 
@@ -1156,5 +1163,5 @@
 !TerminalView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.53 1998-07-27 12:01:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.54 1998-07-27 14:29:05 cg Exp $'
 ! !