lib/PublicInbox/View.pm | 29 ++++++++++++-----------------
diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm
index ac44d442b166ba1189772d363612a4c638450891..f07979e9c1dac4d04d5ef83cc9b36266850c206e 100644
--- a/lib/PublicInbox/View.pm
+++ b/lib/PublicInbox/View.pm
@@ -379,19 +379,20 @@ $rv);
}
sub thread_skel {
- my ($dst, $ctx, $hdr, $upfx) = @_;
+ my ($dst, $ctx, $hdr, $tpfx) = @_;
my $srch = $ctx->{srch};
my $mid = mid_clean($hdr->header_raw('Message-ID'));
my $sres = $srch->get_thread($mid);
my $nr = $sres->{total};
- my $expand = "expand " .
- "/ mbox.gz";
+ my $expand = qq(expand ) .
+ qq(/ mbox.gz ) .
+ qq(/ Atom feed);
my $parent = in_reply_to($hdr);
if ($nr <= 1) {
if (defined $parent) {
$$dst .= "($expand)\n ";
- $$dst .= ghost_parent("$upfx../", $parent) . "\n";
+ $$dst .= ghost_parent("$tpfx../", $parent) . "\n";
} else {
$$dst .= "[no followups, yet] ($expand)\n";
}
@@ -412,7 +413,7 @@ prev_attr => '',
prev_level => 0,
};
for (thread_results(load_results($sres))->rootset) {
- skel_dump($dst, $state, $upfx, $_, 0);
+ skel_dump($dst, $state, $tpfx, $_, 0);
}
$ctx->{next_msg} = $state->{next_msg};
$ctx->{parent_msg} = $parent;
@@ -500,11 +501,8 @@ my $upfx = '../';
my $tpfx = '';
my $idx = $standalone ? " index" : '';
my $irt = '';
-
- if ($srch && $standalone) {
- $idx .= qq{ / follow: Atom feed\n};
- }
if ($idx && $srch) {
+ $idx .= "\n";
thread_skel(\$idx, $ctx, $hdr, $tpfx);
my $p = $ctx->{parent_msg};
my $next = $ctx->{next_msg};
@@ -709,7 +707,7 @@ my $cur = $state->{cur};
my $mid = mid_clean($hdr->header_raw('Message-ID'));
my $f = ascii_html($hdr->header('X-PI-From'));
my $d = _msg_date($hdr);
- my $pfx = ' ' . $d . ' ' . indent_for($level);
+ my $pfx = $d . ' ' . indent_for($level);
my $attr = $f;
$state->{first_level} ||= $level;
@@ -723,7 +721,7 @@
if ($cur) {
if ($cur eq $mid) {
delete $state->{cur};
- $$dst .= "$pfx$dot".
+ $$dst .= "$pfx$dot".
"$attr [this message]\n";
return;
@@ -746,11 +744,8 @@ $s = $s->as_html;
}
my $m = PublicInbox::Hval->new_msgid($mid);
$m = $upfx . '../' . $m->as_href . '/';
- if (defined $s) {
- $$dst .= "$pfx$dot$s $attr\n";
- } else {
- $$dst .= "$pfx$dot$f\n";
- }
+ $$dst .= "$pfx$dot";
+ $$dst .= defined($s) ? "$s $f\n" : "$f\n";
}
sub skel_dump {
@@ -765,7 +760,7 @@ my $mid = $node->messageid;
if ($mid eq 'subject dummy') {
$$dst .= "\t[no common parent]\n";
} else {
- $$dst .= ' [not found] ';
+ $$dst .= ' [not found] ';
my $dot = $level == 0 ? '' : '` ';
$$dst .= indent_for($level) . $dot;
$mid = PublicInbox::Hval->new_msgid($mid);