diff options
Diffstat (limited to 'ephraim_conn.erl')
-rw-r--r-- | ephraim_conn.erl | 13 |
1 files changed, 3 insertions, 10 deletions
diff --git a/ephraim_conn.erl b/ephraim_conn.erl index 009d38d..211db4d 100644 --- a/ephraim_conn.erl +++ b/ephraim_conn.erl @@ -33,16 +33,9 @@ loop(State) -> loop(State); #received_packet{packet_type=message, raw_packet=Packet} -> - case exmpp_message:get_type(Packet) of - chat -> - From = exmpp_xml:get_attribute(Packet, from, <<"unknown">>), - Body = exmpp_message:get_body(Packet), - io:format("~ts: ~ts~n", [From, Body]); - _ -> - ok - end, - loop(State); - + From = exmpp_xml:get_attribute(Packet, from, <<"unknown">>), + ephraim ! {receive_message, From, Packet}, + loop(State); Msg -> io:format("ephraim_conn: ~p~n", [Msg]), loop(State) |