25
1
mirror of https://github.com/processone/ejabberd.git synced 2024-11-30 16:36:29 +01:00

Fix ip source to comply with new ip storage into ejabberd_http (thanks to Christophe Romain)

SVN Revision: 2192
This commit is contained in:
Badlop 2009-06-16 13:52:57 +00:00
parent fa83147926
commit b44a3c7650

View File

@ -108,7 +108,7 @@ join([H | T], Separator) ->
log(File, Code, Request) -> log(File, Code, Request) ->
{{Year, Month, Day}, {Hour, Minute, Second}} = calendar:local_time(), {{Year, Month, Day}, {Hour, Minute, Second}} = calendar:local_time(),
IP = join(tuple_to_list(Request#request.ip), "."), IP = join(tuple_to_list(element(1, Request#request.ip)), "."),
Path = join(Request#request.path, "/"), Path = join(Request#request.path, "/"),
Query = case join(lists:map(fun(E) -> lists:concat([element(1, E), "=", element(2, E)]) end, Query = case join(lists:map(fun(E) -> lists:concat([element(1, E), "=", element(2, E)]) end,
Request#request.q), "&") of Request#request.q), "&") of