diff options
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/tcp_echo/relx.config | 2 | ||||
| -rw-r--r-- | examples/tcp_echo/src/echo_protocol.erl | 2 | ||||
| -rw-r--r-- | examples/tcp_reverse/relx.config | 2 | ||||
| -rw-r--r-- | examples/tcp_reverse/src/reverse_protocol.erl | 2 |
4 files changed, 4 insertions, 4 deletions
diff --git a/examples/tcp_echo/relx.config b/examples/tcp_echo/relx.config index a850b71..ee746d5 100644 --- a/examples/tcp_echo/relx.config +++ b/examples/tcp_echo/relx.config @@ -1,2 +1,2 @@ -{release, {tcp_echo_example, "1"}, [tcp_echo]}. +{release, {tcp_echo_example, "1"}, [tcp_echo, sasl]}. {extended_start_script, true}. diff --git a/examples/tcp_echo/src/echo_protocol.erl b/examples/tcp_echo/src/echo_protocol.erl index c07b424..7312e53 100644 --- a/examples/tcp_echo/src/echo_protocol.erl +++ b/examples/tcp_echo/src/echo_protocol.erl @@ -15,7 +15,7 @@ init(Ref, Transport, _Opts = []) -> loop(Socket, Transport). loop(Socket, Transport) -> - case Transport:recv(Socket, 0, 5000) of + case Transport:recv(Socket, 0, 30000) of {ok, Data} when Data =/= <<4>> -> Transport:send(Socket, Data), loop(Socket, Transport); diff --git a/examples/tcp_reverse/relx.config b/examples/tcp_reverse/relx.config index 2a83916..2b1651f 100644 --- a/examples/tcp_reverse/relx.config +++ b/examples/tcp_reverse/relx.config @@ -1,2 +1,2 @@ -{release, {tcp_reverse_example, "1"}, [tcp_reverse]}. +{release, {tcp_reverse_example, "1"}, [tcp_reverse, sasl]}. {extended_start_script, true}. diff --git a/examples/tcp_reverse/src/reverse_protocol.erl b/examples/tcp_reverse/src/reverse_protocol.erl index 2865a60..afd78b9 100644 --- a/examples/tcp_reverse/src/reverse_protocol.erl +++ b/examples/tcp_reverse/src/reverse_protocol.erl @@ -14,7 +14,7 @@ -export([terminate/3]). -export([code_change/4]). --define(TIMEOUT, 5000). +-define(TIMEOUT, 30000). -record(state, {socket, transport}). |