aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBadlop <badlop@process-one.net>2008-03-09 10:09:38 +0000
committerBadlop <badlop@process-one.net>2008-03-09 10:09:38 +0000
commitee339aebb849574cfd6f8d7d4ca102becddfb4b6 (patch)
tree1f0e6caf71d26da6b3cdcbe5bb2318c99f8f8dd8
parentadd missing ~p to error message (diff)
* src/mod_proxy65/mod_proxy65_service.erl: Implement alternative
to the deprecated function inet:ip_to_bytes (thanks to Evgeniy Khramtsov)(EJAB-542) SVN Revision: 1222
-rw-r--r--ChangeLog6
-rw-r--r--src/mod_proxy65/mod_proxy65_service.erl2
2 files changed, 7 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index e710155d2..20f1afde6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2008-03-09 Badlop <badlop@process-one.net>
+
+ * 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 <mremond@process-one.net>
* 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,