X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=lib%2FPublicInbox%2FWWW.pm;h=369be686173024b63013e1316f29652f9d15f6ef;hp=2acb4c83b0175ad1d2f7550bda4058673a600366;hb=3cda6050b7c8f73e7fd86f88efc5cd42d0c13f73;hpb=2d7d6d91b8894052b8b6088defaf7ea1711eba06 diff --git a/lib/PublicInbox/WWW.pm b/lib/PublicInbox/WWW.pm index 2acb4c83..369be686 100644 --- a/lib/PublicInbox/WWW.pm +++ b/lib/PublicInbox/WWW.pm @@ -147,8 +147,8 @@ sub invalid_list_mid { if ($mid = mid2blob($ctx)) { require Email::Simple; use PublicInbox::MID qw/mid_clean/; - $mid = Email::Simple->new($mid); - $ctx->{mid} = mid_clean($mid->header('Message-ID')); + my $s = Email::Simple->new($mid); + $ctx->{mid} = mid_clean($s->header('Message-ID')); } } undef;