diff options
| author | Zandra <[email protected]> | 2016-02-04 15:38:43 +0100 |
|---|---|---|
| committer | Zandra <[email protected]> | 2016-02-04 15:38:43 +0100 |
| commit | ceb7400d078c64e5283e67f2a485b1594b0a9c90 (patch) | |
| tree | 46be307c58cc4b63228a70d9b8812a605eb627cf /lib/ssl/src/ssl_tls_dist_proxy.erl | |
| parent | 771c4e5f346e9ee79a9d40251d545fc2ef6d2157 (diff) | |
| parent | a1c497746ca98034890043be316d93dfdfdf8626 (diff) | |
| download | otp-ceb7400d078c64e5283e67f2a485b1594b0a9c90.tar.gz otp-ceb7400d078c64e5283e67f2a485b1594b0a9c90.tar.bz2 otp-ceb7400d078c64e5283e67f2a485b1594b0a9c90.zip | |
Merge branch 'maint'
Diffstat (limited to 'lib/ssl/src/ssl_tls_dist_proxy.erl')
| -rw-r--r-- | lib/ssl/src/ssl_tls_dist_proxy.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/ssl/src/ssl_tls_dist_proxy.erl b/lib/ssl/src/ssl_tls_dist_proxy.erl index 1e6c6e726a..211badef56 100644 --- a/lib/ssl/src/ssl_tls_dist_proxy.erl +++ b/lib/ssl/src/ssl_tls_dist_proxy.erl @@ -109,7 +109,7 @@ init([]) -> {ok, #state{}}. handle_call({listen, Name}, _From, State) -> - case gen_tcp:listen(0, [{active, false}, {packet,?PPRE}]) of + case gen_tcp:listen(0, [{active, false}, {packet,?PPRE}, {ip, loopback}]) of {ok, Socket} -> {ok, World} = do_listen([{active, false}, binary, {packet,?PPRE}, {reuseaddr, true}]), {ok, TcpAddress} = get_tcp_address(Socket), @@ -268,7 +268,7 @@ setup_proxy(Ip, Port, Parent) -> Opts = connect_options(get_ssl_options(client)), case ssl:connect(Ip, Port, [{active, true}, binary, {packet,?PPRE}, nodelay()] ++ Opts) of {ok, World} -> - {ok, ErtsL} = gen_tcp:listen(0, [{active, true}, {ip, {127,0,0,1}}, binary, {packet,?PPRE}]), + {ok, ErtsL} = gen_tcp:listen(0, [{active, true}, {ip, loopback}, binary, {packet,?PPRE}]), {ok, #net_address{address={_,LPort}}} = get_tcp_address(ErtsL), Parent ! {self(), go_ahead, LPort}, case gen_tcp:accept(ErtsL) of |