X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FLog%2FSpam.pm;fp=Debbugs%2FLog%2FSpam.pm;h=cca94dea7cc7070ac3d0b9031eb99b3f3cd74e8d;hb=44daaa532291ed1b4d6e00d26cf8a698d8b259ea;hp=3b14b39cfafed904231eab82d224f27a3c063bc6;hpb=729d35dd71c6f46b6ebb079de1aed80e03170935;p=debbugs.git

diff --git a/Debbugs/Log/Spam.pm b/Debbugs/Log/Spam.pm
index 3b14b39..cca94de 100644
--- a/Debbugs/Log/Spam.pm
+++ b/Debbugs/Log/Spam.pm
@@ -158,6 +158,7 @@ Returns 0 if this message is not spam
 =cut
 sub is_spam {
     my ($self,$msgid) = @_;
+    return 0 if not defined $msgid or not length $msgid;
     $msgid =~ s/^<|>$//;
     if (exists $self->{spam}{$msgid} and
         $self->{spam}{$msgid}