]> Sergey Matveev's repositories - public-inbox.git/commitdiff
thread: sort incoming messages by Date
authorEric Wong <e@80x24.org>
Wed, 25 Apr 2018 08:52:49 +0000 (08:52 +0000)
committerEric Wong <e@80x24.org>
Wed, 25 Apr 2018 08:53:03 +0000 (08:53 +0000)
Improve the display by finding any parent when we see out-of-order
References.  This prevents us from having two roots in the test
case like Mail::Thread does.

lib/PublicInbox/SearchThread.pm
t/thread-cycle.t

index 450a06f43bc86f6266d32811e6efd507ffe94c7a..be29098073cab4bd1f67884750c5ee273e572336 100644 (file)
@@ -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 ];
index 9e915a124986866c33061e3c950f8aed733eea88..78dcb6f9db14892495b661e93b0670accb7c44f9 100644 (file)
@@ -85,13 +85,13 @@ SKIP: {
 }
 ($simples, $smsgs) = make_objs(reverse @backwards);
 my $forward = thread_to_s($smsgs);
-if ('Mail::Thread sorts by Date') {
+unless ('Mail::Thread sorts by Date') {
        SKIP: {
                skip 'Mail::Thread missing', 1 unless $mt;
                check_mt($forward, $simples, 'matches Mail::Thread forwards');
        }
 }
-unless ('sorting by Date') {
+if ('sorting by Date') {
        is("\n".$backward, "\n".$forward, 'forward and backward matches');
 }