* src/web/ejabberd_http_poll.erl: Bugfix: using tuple instead of a Pid

to send Erlang messages in a rarely used case.

SVN Revision: 580

diff --git a/ChangeLog b/ChangeLog
index 3f7ae232614cb4b22a9ee1a28a9b0e9d8a16208d..e191c9204968083b8f7e4c614566e67200e7f03c 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2006-06-15  Mickael Remond  <mickael.remond@process-one.net>
+
+       * src/web/ejabberd_http_poll.erl: Bugfix: using tuple instead of a Pid
+       to send Erlang messages in a rarely used case.
+
 2006-06-13  Mickael Remond  <mickael.remond@process-one.net>
 
        * src/ejabberd_auth.erl: Fixed broken multiple connection with

diff --git a/src/web/ejabberd_http_poll.erl b/src/web/ejabberd_http_poll.erl
index e62abf0d56f7d704c6e95769c8faa672636c279a..dcd04123509f678c12d544175d359e17d7e7d050 100644 (file)
--- a/src/web/ejabberd_http_poll.erl
+++ b/src/web/ejabberd_http_poll.erl
@@ -204,7 +204,8 @@ handle_sync_event(activate, From, StateName, StateData) ->
        "" ->
            {reply, ok, StateName, StateData#state{waiting_input = From}};
        Input ->
-           From ! {tcp, {http_poll, self()}, list_to_binary(Input)},
+            {Receiver, _Tag} = From,
+           Receiver ! {tcp, {http_poll, self()}, list_to_binary(Input)},
            {reply, ok, StateName, StateData#state{input = "",
                                                   waiting_input = false,
                                                   last_receiver = From