lib/PublicInbox/Feed.pm | 4 ++++ t/cgi.t | 1 - diff --git a/lib/PublicInbox/Feed.pm b/lib/PublicInbox/Feed.pm index 75e5d9532de3e7f0a21ec9344487b3c35b18e2aa..16b860cbde641baee0cdf9bb7dbee9b7c4a948a4 100644 --- a/lib/PublicInbox/Feed.pm +++ b/lib/PublicInbox/Feed.pm @@ -56,6 +56,10 @@ each_recent_blob($max, sub { my $str = `git cat-file blob $_[0]`; return 0 if $? != 0; my $simple = Email::Simple->new($str); + if ($top && ($simple->header("In-Reply-To") || + $simple->header("References"))) { + return 0; + } $simple->body_set(""); # save some memory push @messages, $simple; 1; diff --git a/t/cgi.t b/t/cgi.t index c8755541211ffd3757480ba8b519a851a17e0831..91efca50a58a63c90fd90e81f8b859c9e6137f52 100644 --- a/t/cgi.t +++ b/t/cgi.t @@ -134,7 +134,6 @@ my $reply = Email::Simple->new(< To: Me Cc: $addr -In-Reply-To: Message-Id: <$slashy_mid> Subject: Re: hihi Date: Thu, 01 Jan 1970 00:00:01 +0000