--- a/TerminalApplication.st	Mon Jul 29 16:09:03 2013 +0200
+++ b/TerminalApplication.st	Mon Jul 29 18:29:15 2013 +0200
@@ -256,6 +256,13 @@
                   label: '-'
                 )
                (MenuItem
+                  label: 'Send "~." (ssh/telnet quit)'
+                  itemValue: doSendTildeStop
+                )
+               (MenuItem
+                  label: '-'
+                )
+               (MenuItem
                   label: 'Reset Terminal'
                   itemValue: doReset
                 )
@@ -405,6 +412,12 @@
     self selectedWorkspacesTextView doSendKillSignal.
 !
 
+doSendTildeStop
+    self selectedWorkspacesTextView send:'~.'.
+
+    "Created: / 29-07-2013 / 18:20:36 / cg"
+!
+
 menuPlayback
     |file suff|
 
@@ -514,10 +527,10 @@
 !TerminalApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.14 2013-07-24 10:01:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.15 2013-07-29 16:29:15 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.14 2013-07-24 10:01:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.15 2013-07-29 16:29:15 cg Exp $'
 ! !