diff options
author | Eric Wong <e@80x24.org> | 2016-10-14 09:00:01 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2016-10-14 21:12:42 +0000 |
commit | 123031737a09edb3297e0fc6ea9e566fc2fecdf5 (patch) | |
tree | 18324713168c363c29ed6b2d918f637184dad1d6 /lib/PublicInbox/SearchThread.pm | |
parent | f2b07568e623c2a0aff4d0135617a26c887d2755 (diff) | |
download | public-inbox-123031737a09edb3297e0fc6ea9e566fc2fecdf5.tar.gz |
This reverts commit 3c9dd6619f825f0515e7e4afa1bd55c99c1a68d3 ("thread: fix sorting without topmost") and reinstates the "topmost" routine for sorting purposes.
Diffstat (limited to 'lib/PublicInbox/SearchThread.pm')
-rw-r--r-- | lib/PublicInbox/SearchThread.pm | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/lib/PublicInbox/SearchThread.pm b/lib/PublicInbox/SearchThread.pm index 24a56d2d..fe70406b 100644 --- a/lib/PublicInbox/SearchThread.pm +++ b/lib/PublicInbox/SearchThread.pm @@ -98,6 +98,16 @@ sub new { }, $_[0]; } +sub topmost { + my ($self) = @_; + my @q = ($self); + while (my $cont = shift @q) { + return $cont if $cont->{smsg}; + push @q, values %{$cont->{children}}; + } + undef; +} + sub add_child { my ($self, $child) = @_; croak "Cowardly refusing to become my own parent: $self" |