p5p: Fix subject encoding

nntp.perl.org doesn't add a space after Re:, which causes issues
for Email::MIME::RFC2047::Decoder.

1 files changed, 1 insertions, 0 deletions

diff --git a/run/p5p b/run/p5p
index 02530a6..e645bba 100755
--- a/run/p5p
+++ b/run/p5p
@@ -37,6 +37,7 @@ for my $alt (@alt) {
 		$f{$id} =~ s,@[^.]*\.,@<i>hidden</i>.,;
 
 		$s{$id} = '(no subject)' if not exists $s{$id};
+		$s{$id} =~ s/Re:=\?/Re: =?/; # fix encoding
 		$s{$id} = $decoder->decode_text($s{$id});
 		$s{$id} = encode_entities($s{$id});