[PATCH 1/2] view: account for filter bugs which leak HTML into the repo

[Eric Wong <e@80x24.org>]

Ugh, apparently there's a (yet-to-be-fixed) bug in the Filter
code which caused an HTML message portion of a multipart message
to be displayed on the web UI.  Account for that and nuke it.
---
 lib/PublicInbox/View.pm | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm
index e76d904..b09c3ba 100644
--- a/lib/PublicInbox/View.pm
+++ b/lib/PublicInbox/View.pm
@@ -104,7 +104,12 @@ sub index_entry {
 	$mime->walk_parts(sub {
 		my ($part) = @_;
 		return if $part->subparts; # walk_parts already recurses
-		my $enc = enc_for($part->content_type) || $enc_msg || $enc_utf8;
+		my $ct = $part->content_type;
+
+		# account for filter bugs...
+		return if defined $ct && $ct =~ m!\btext/[xh]+tml\b!i;
+
+		my $enc = enc_for($ct) || $enc_msg || $enc_utf8;
 
 		if ($part_nr > 0) {
 			my $fn = $part->filename;
@@ -178,7 +183,12 @@ sub multipart_text_as_html {
 	$mime->walk_parts(sub {
 		my ($part) = @_;
 		return if $part->subparts; # walk_parts already recurses
-		my $enc = enc_for($part->content_type) || $enc_msg || $enc_utf8;
+		my $ct = $part->content_type;
+
+		# account for filter bugs...
+		return if defined $ct && $ct =~ m!\btext/[xh]+tml\b!i;
+
+		my $enc = enc_for($ct) || $enc_msg || $enc_utf8;
 
 		if ($part_nr > 0) {
 			my $fn = $part->filename;
-- 
EW