--- a/TerminalView.st Wed Apr 21 12:15:36 1999 +0200
+++ b/TerminalView.st Wed Apr 21 12:21:44 1999 +0200
@@ -330,9 +330,10 @@
(inStream notNil
and:[inStream isExternalStream
and:[inStream isOpen]]) ifTrue:[
+ numberOfColumns := (innerWidth // font width).
(OperatingSystem
setWindowSizeOnFileDescriptor:inStream fileDescriptor
- width:(innerWidth // font width)
+ width:numberOfColumns
height:(nFullLinesShown)) ifFalse:[
"/ Transcript showCR:'VT100: cannot change windowSize'.
].
@@ -1230,5 +1231,5 @@
!TerminalView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.61 1999-04-21 10:15:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.62 1999-04-21 10:21:44 cg Exp $'
! !