From 1983f3f0dbbbbcedf99f48602c10b3916c1fb53b Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= <john@ankarstrom.se>
Date: Mon, 10 May 2021 15:15:54 +0200
Subject: p5p: Fix subject encoding

nntp.perl.org doesn't add a space after Re:, which causes issues
for Email::MIME::RFC2047::Decoder.
---
 run/p5p | 1 +
 1 file changed, 1 insertion(+)

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});
 
-- 
cgit v1.2.3