--- a/TerminalApplication.st Tue Jul 30 09:45:25 2013 +0200
+++ b/TerminalApplication.st Tue Jul 30 10:16:31 2013 +0200
@@ -514,7 +514,7 @@
keepAliveProcess :=
[
[true] whileTrue:[
- self sendCR:''.
+ self selectedWorkspacesTextView sendCR:''.
Delay waitForSeconds:30.
].
] newProcess.
@@ -589,10 +589,10 @@
!TerminalApplication class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.17 2013-07-30 07:17:39 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.18 2013-07-30 08:16:31 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.17 2013-07-30 07:17:39 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.18 2013-07-30 08:16:31 cg Exp $'
! !