summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/ejabberd_listener.erl4
-rw-r--r--src/ejabberd_web_admin.erl3
2 files changed, 4 insertions, 3 deletions
diff --git a/src/ejabberd_listener.erl b/src/ejabberd_listener.erl
index 28edf945..54bc877c 100644
--- a/src/ejabberd_listener.erl
+++ b/src/ejabberd_listener.erl
@@ -350,7 +350,7 @@ stop_listener({_, _, Transport} = PortIP, Module) ->
end.
add_listener(PortIP, Module, Opts) ->
- {Port, IPT, _, _, Proto, _} = parse_listener_portip(PortIP, Opts),
+ {Port, IPT, _, Proto, _} = parse_listener_portip(PortIP, Opts),
PortIP1 = {Port, IPT, Proto},
case start_listener(PortIP1, Module, Opts) of
{ok, _Pid} ->
@@ -373,7 +373,7 @@ delete_listener(PortIP, Module) ->
%% Module = atom()
%% Opts = [term()]
delete_listener(PortIP, Module, Opts) ->
- {Port, IPT, _, _, Proto, _} = parse_listener_portip(PortIP, Opts),
+ {Port, IPT, _, Proto, _} = parse_listener_portip(PortIP, Opts),
PortIP1 = {Port, IPT, Proto},
stop_listener(PortIP1, Module).
diff --git a/src/ejabberd_web_admin.erl b/src/ejabberd_web_admin.erl
index 7f031dce..46c95733 100644
--- a/src/ejabberd_web_admin.erl
+++ b/src/ejabberd_web_admin.erl
@@ -2242,8 +2242,9 @@ make_netprot_html(NetProt) ->
[<<"tcp">>, <<"udp">>]))).
get_port_data(PortIP, Opts) ->
- {Port, IPT, IPS, _IPV, NetProt, OptsClean} =
+ {Port, IPT, _IPV, NetProt, OptsClean} =
ejabberd_listener:parse_listener_portip(PortIP, Opts),
+ IPS = misc:ip_to_list(IPT),
SPort = integer_to_binary(Port),
SSPort = list_to_binary(
lists:map(fun (N) ->