Add Id attribute in stanza built by send_message command

diff --git a/src/mod_admin_extra.erl b/src/mod_admin_extra.erl
index 799f0079f0697d9ad356538d3c36c784c46bda0b..b0216b46150e8ff79974d0297ea6cfa4a33c71ed 100644 (file)
--- a/src/mod_admin_extra.erl
+++ b/src/mod_admin_extra.erl
@@ -1541,6 +1541,7 @@ send_message(Type, From, To, Subject, Body) ->
 build_packet(Type, Subject, Body) ->
     #message{type = misc:binary_to_atom(Type),
             body = xmpp:mk_text(Body),
+            id = randoms:get_string(),
             subject = xmpp:mk_text(Subject)}.
 
 send_stanza(FromString, ToString, Stanza) ->