Send announce Message stanzas as Headline type instead of Normal

src/mod_announce.erl

@@ -571,7 +571,7 @@ handle_adhoc_form(From, #jid{lserver = LServer} = To,
 			       node = Node,
 			       sessionid = SessionID,
 			       status = completed},
-    Packet = {xmlelement, "message", [{"type", "normal"}], 
+    Packet = {xmlelement, "message", [{"type", "headline"}],
 	      if Subject /= [] ->
 		      [{xmlelement, "subject", [], 
 			[{xmlcdata, Subject}]}];
@@ -964,7 +964,7 @@ send_announcement_to_all(Host, SubjectS, BodyS) ->
 		 true ->
 		      []
 	      end,
-    Packet = {xmlelement, "message", [{"type", "normal"}], SubjectEls ++ BodyEls},
+    Packet = {xmlelement, "message", [{"type", "headline"}], SubjectEls ++ BodyEls},
     Sessions = ejabberd_sm:dirty_get_sessions_list(),
     Local = jlib:make_jid("", Host, ""),
     lists:foreach(