Respect privacy lists for incoming PEP messages

diff --git a/src/ejabberd_c2s.erl b/src/ejabberd_c2s.erl
index c0b042ec6a42dd8f27b1d07786ac4c6d040b4c5d..3bb8a04ac05af581f6700c4bccf43f6b4e827ecd 100644 (file)
--- a/src/ejabberd_c2s.erl
+++ b/src/ejabberd_c2s.erl
@@ -1755,7 +1755,13 @@ handle_info({send_filtered, Feature, From, To, Packet}, StateName, StateData) ->
                          FinalPacket = jlib:replace_from_to(From, To, Packet),
                          case StateData#state.jid of
                            To ->
-                               send_packet(StateData, FinalPacket);
+                               case privacy_check_packet(StateData, From, To,
+                                                         FinalPacket, in) of
+                                 deny ->
+                                     StateData;
+                                 allow ->
+                                     send_stanza(StateData, FinalPacket)
+                               end;
                            _ ->
                                ejabberd_router:route(From, To, FinalPacket),
                                StateData