ignore deleted messages when queueing

[spider.git] / perl / DXMsg.pm

diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm
index 75a0c452c0e9034d830afc042820dc02be28b801..118d991034f947d1778ebdb54167458bf4eea910 100644 (file)
--- a/perl/DXMsg.pm
+++ b/perl/DXMsg.pm
@@ -648,6 +648,7 @@ sub queue_msg
                        $ref->del_msg;
                        next;
                }
+               next if $ref->{delete};
                
                # firstly, is it private and unread? if so can I find the recipient
                # in my cluster node list offsite?