From 95d8bd7377401f663ab5419df02174a42eddea2e Mon Sep 17 00:00:00 2001
From: Hans Nilsson <hans@erlang.org>
Date: Fri, 29 Nov 2013 15:32:12 +0100
Subject: ssh: Fix long cli delays. (Part of OTP-11339, OTP-10953)

A step in fixing the tickets.
---
 lib/ssh/src/ssh_cli.erl | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

(limited to 'lib/ssh/src/ssh_cli.erl')

diff --git a/lib/ssh/src/ssh_cli.erl b/lib/ssh/src/ssh_cli.erl
index 5cb1e133d3..2c8e515a14 100644
--- a/lib/ssh/src/ssh_cli.erl
+++ b/lib/ssh/src/ssh_cli.erl
@@ -161,6 +161,21 @@ handle_msg({ssh_channel_up, ChannelId, ConnectionHandler},
 		  cm = ConnectionHandler} = State) ->
     {ok,  State};
 
+handle_msg({Group, set_unicode_state, _Arg}, State) ->
+    Group ! {self(), set_unicode_state, false},
+    {ok, State};
+
+handle_msg({Group, get_unicode_state}, State) ->
+    Group ! {self(), get_unicode_state, false},
+    {ok, State};
+
+handle_msg({Group, tty_geometry}, #state{group = Group,
+					 pty = #ssh_pty{width=Width,
+							height=Height}
+					} = State) ->
+    Group ! {self(),tty_geometry,{Width,Height}},
+    {ok,State};
+    
 handle_msg({Group, Req}, #state{group = Group, buf = Buf, pty = Pty,
 				 cm = ConnectionHandler,
 				 channel = ChannelId} = State) ->
-- 
cgit v1.2.3