--- a/TerminalSession.st Mon May 19 16:41:29 2014 +0200
+++ b/TerminalSession.st Mon May 26 14:32:19 2014 +0200
@@ -619,20 +619,22 @@
] ifFalse:[
line := outStream nextLine,Character cr.
n := line size.
- self collectOutputAndCheckForPrompt:line count:n.
pluggableProcessInputAction notNil ifTrue:[
pluggableProcessInputAction value:line value:n.
+ ].
+ collectedOutput notNil ifTrue:[
+ self collectOutputAndCheckForPrompt:line count:n.
]
]
] ifFalse:[
n := outStream nextAvailableBytes:bufferSize into:buffer startingAt:1.
n > 0 ifTrue:[
+ pluggableProcessInputAction notNil ifTrue:[
+ pluggableProcessInputAction value:buffer value:n.
+ ].
collectedOutput notNil ifTrue:[
self collectOutputAndCheckForPrompt:buffer count:n
].
- pluggableProcessInputAction notNil ifTrue:[
- pluggableProcessInputAction value:buffer value:n.
- ]
].
].
].
@@ -722,11 +724,11 @@
!TerminalSession class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/TerminalSession.st,v 1.19 2014-05-09 23:50:53 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/TerminalSession.st,v 1.20 2014-05-26 12:32:19 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic2/TerminalSession.st,v 1.19 2014-05-09 23:50:53 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/TerminalSession.st,v 1.20 2014-05-26 12:32:19 cg Exp $'
! !