diff options
| author | Peter Andersson <[email protected]> | 2014-05-02 10:54:25 +0200 |
|---|---|---|
| committer | Peter Andersson <[email protected]> | 2014-05-02 10:55:06 +0200 |
| commit | 10f47281bf94e7e3ed98f97f3c1531036edce9cc (patch) | |
| tree | 845c29e2130d40581a5d54aacf53a17d8a23a385 /lib/common_test/test/telnet_server.erl | |
| parent | aca0b6182b039333b4c963938878d9eecc85e5a1 (diff) | |
| parent | 737c230253fe35a8265b9e2f9f4d8367ca429a66 (diff) | |
| download | otp-10f47281bf94e7e3ed98f97f3c1531036edce9cc.tar.gz otp-10f47281bf94e7e3ed98f97f3c1531036edce9cc.tar.bz2 otp-10f47281bf94e7e3ed98f97f3c1531036edce9cc.zip | |
Merge remote branch 'origin/peppe/common_test/telnet_reversed_strings' into maint
* origin/peppe/common_test/telnet_reversed_strings:
Fix problem with send printout not being tagged with connection name
Fix problem with substring in large message getting incorrectly reversed
OTP-11871
Diffstat (limited to 'lib/common_test/test/telnet_server.erl')
| -rw-r--r-- | lib/common_test/test/telnet_server.erl | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/lib/common_test/test/telnet_server.erl b/lib/common_test/test/telnet_server.erl index ae56787819..1d341d6106 100644 --- a/lib/common_test/test/telnet_server.erl +++ b/lib/common_test/test/telnet_server.erl @@ -198,6 +198,14 @@ do_handle_data(Data,#state{authorized={user,_}}=State) -> do_handle_data("echo " ++ Data,State) -> send(Data++"\r\n> ",State), {ok,State}; +do_handle_data("echo_sep " ++ Data,State) -> + Msgs = string:tokens(Data," "), + lists:foreach(fun(Msg) -> + send(Msg,State), + timer:sleep(10) + end, Msgs), + send("\r\n> ",State), + {ok,State}; do_handle_data("echo_no_prompt " ++ Data,State) -> send(Data,State), {ok,State}; |