diff --git a/ChangeLog b/ChangeLog index e710155d2..20f1afde6 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2008-03-09 Badlop + + * src/mod_proxy65/mod_proxy65_service.erl: Implement alternative + to the deprecated function inet:ip_to_bytes (thanks to Evgeniy + Khramtsov)(EJAB-542) + 2008-03-07 Mickael Remond * src/eldap/eldap_pool.erl: Improved logging diff --git a/src/mod_proxy65/mod_proxy65_service.erl b/src/mod_proxy65/mod_proxy65_service.erl index 78392fa47..41c3af7d5 100644 --- a/src/mod_proxy65/mod_proxy65_service.erl +++ b/src/mod_proxy65/mod_proxy65_service.erl @@ -201,7 +201,7 @@ parse_options(ServerHost, Opts) -> none -> get_proxy_or_domainip(ServerHost, MyHost); Addr -> Addr end, - [_ | StrIP] = lists:append([[$. | integer_to_list(X)] || X <- inet:ip_to_bytes(IP)]), + StrIP = inet_parse:ntoa(IP), StreamAddr = [{"jid", MyHost}, {"host", StrIP}, {"port", integer_to_list(Port)}], {IP, #state{myhost = MyHost, serverhost = ServerHost,