diff options
| author | Zandra Hird <[email protected]> | 2015-05-06 13:01:07 +0200 |
|---|---|---|
| committer | Zandra Hird <[email protected]> | 2015-05-06 13:01:07 +0200 |
| commit | 0440e0e45835de5adbe790f9437492d734c6c4e1 (patch) | |
| tree | 978ff1a48ae243e69fca96cce5eb2654b66c8076 /lib/common_test/test/telnet_server.erl | |
| parent | 83ff5ec3ced8ce1c456bfdf75fcbf5be01385388 (diff) | |
| parent | efbfe9602983ff451b864e557bdf3733222b78ba (diff) | |
| download | otp-0440e0e45835de5adbe790f9437492d734c6c4e1.tar.gz otp-0440e0e45835de5adbe790f9437492d734c6c4e1.tar.bz2 otp-0440e0e45835de5adbe790f9437492d734c6c4e1.zip | |
Merge branch 'maint'
Conflicts:
OTP_VERSION
erts/vsn.mk
lib/test_server/src/erl2html2.erl
Diffstat (limited to 'lib/common_test/test/telnet_server.erl')
| -rw-r--r-- | lib/common_test/test/telnet_server.erl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/common_test/test/telnet_server.erl b/lib/common_test/test/telnet_server.erl index e073f0bfa4..107d98d72c 100644 --- a/lib/common_test/test/telnet_server.erl +++ b/lib/common_test/test/telnet_server.erl @@ -242,6 +242,12 @@ do_handle_data("echo_loop " ++ Data,State) -> ReturnData = string:join(Lines,"\n"), send_loop(list_to_integer(TStr),ReturnData,State), {ok,State}; +do_handle_data("echo_delayed_prompt "++Data,State) -> + [MsStr|EchoData] = string:tokens(Data, " "), + send(string:join(EchoData,"\n"),State), + ct:sleep(list_to_integer(MsStr)), + send("\r\n> ",State), + {ok,State}; do_handle_data("disconnect_after " ++WaitStr,State) -> Wait = list_to_integer(string:strip(WaitStr,right,$\n)), dbg("Server will close connection in ~w ms...", [Wait]), |