X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=lib%2FPublicInbox%2FFilter%2FSubjectTag.pm;h=7735a94a049f431ccf5bc785cc1315a162ab0fb7;hp=1d2814255f9bbe6611186b3a99353ebe268fe26f;hb=e772b371ea15d5903720a00c7c24b535e781b4bf;hpb=6dd8be30a9aeefa550b05a4f298934fd37a25c2c diff --git a/lib/PublicInbox/Filter/SubjectTag.pm b/lib/PublicInbox/Filter/SubjectTag.pm index 1d281425..7735a94a 100644 --- a/lib/PublicInbox/Filter/SubjectTag.pm +++ b/lib/PublicInbox/Filter/SubjectTag.pm @@ -19,8 +19,10 @@ sub new { sub scrub { my ($self, $mime) = @_; my $subj = $mime->header('Subject'); - $subj =~ s/$self->{tag_re}/$1/; # $1 is "Re: " - $mime->header_str_set('Subject', $subj); + if (defined $subj) { + $subj =~ s/$self->{tag_re}/$1/; # $1 is "Re: " + $mime->header_str_set('Subject', $subj); + } $self->ACCEPT($mime); }