X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=lib%2FPublicInbox%2FSearchThread.pm;h=be29098073cab4bd1f67884750c5ee273e572336;hp=450a06f43bc86f6266d32811e6efd507ffe94c7a;hb=c204da04aa24e85236f82ba5a7c6c7e19c8a20d3;hpb=ec2df4c3b80104a0bf15b0d917d82264bbf9b50e diff --git a/lib/PublicInbox/SearchThread.pm b/lib/PublicInbox/SearchThread.pm index 450a06f4..be290980 100644 --- a/lib/PublicInbox/SearchThread.pm +++ b/lib/PublicInbox/SearchThread.pm @@ -22,9 +22,16 @@ use strict; use warnings; sub thread { - my ($messages, $ordersub, $ibx) = @_; + my ($msgs, $ordersub, $ibx) = @_; my $id_table = {}; - _add_message($id_table, $_) foreach @$messages; + + # Sadly, we sort here anyways since the fill-in-the-blanks References: + # can be shakier if somebody used In-Reply-To with multiple, disparate + # messages. So, take the client Date: into account since we can't + # alway determine ordering when somebody uses multiple In-Reply-To. + # We'll trust the client Date: header here instead of the Received: + # time since this is for display (and not retrieval) + _add_message($id_table, $_) for sort { $a->{ds} <=> $b->{ds} } @$msgs; my $rootset = [ grep { !delete($_->{parent}) && $_->visible($ibx) } values %$id_table ];