run update-copyrights from gnulib for 2019

[public-inbox.git] / lib / PublicInbox / Filter / SubjectTag.pm

diff --git a/lib/PublicInbox/Filter/SubjectTag.pm b/lib/PublicInbox/Filter/SubjectTag.pm
index 1d2814255f9bbe6611186b3a99353ebe268fe26f..1da011bd2f6e1a855e9a5a0990641f777d7c77f0 100644 (file)
--- a/lib/PublicInbox/Filter/SubjectTag.pm
+++ b/lib/PublicInbox/Filter/SubjectTag.pm
@@ -1,4 +1,4 @@
-# Copyright (C) 2017 all contributors <meta@public-inbox.org>
+# Copyright (C) 2017-2019 all contributors <meta@public-inbox.org>
 # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt>
 
 # Filter for various [tags] in subjects
@@ -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);
 }