--- a/TerminalView.st Thu Mar 11 17:42:31 2004 +0100
+++ b/TerminalView.st Fri Mar 19 19:58:02 2004 +0100
@@ -1158,7 +1158,7 @@
self waitUntilVisible.
StreamError handle:[:ex |
- Transcript show:'Terminal(PTY-reader) [error]: '; showCR:ex errorString.
+ Transcript show:'Terminal(PTY-reader) [error]: '; showCR:ex description.
] do:[
[true] whileTrue:[
Object abortSignal handle:[:ex |
@@ -1205,7 +1205,7 @@
]
]
]
- ] valueOnUnwindDo:[
+ ] ifCurtailed:[
readerProcess := nil
]
] fork. "/ forkAt:9.
@@ -1857,7 +1857,7 @@
!TerminalView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.122 2003-12-31 18:38:14 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.123 2004-03-19 18:58:02 stefan Exp $'
! !
TerminalView initialize!