$title

lib/PublicInbox/Feed.pm | 6 +++--- lib/PublicInbox/View.pm | 11 ++++++----- t/view.t | 4 ++-- diff --git a/lib/PublicInbox/Feed.pm b/lib/PublicInbox/Feed.pm index 16b860cbde641baee0cdf9bb7dbee9b7c4a948a4..b08bd8837507e51a37d55ec458c23da9cc11a3aa 100644 --- a/lib/PublicInbox/Feed.pm +++ b/lib/PublicInbox/Feed.pm @@ -69,8 +69,8 @@ my $th = Mail::Thread->new(@messages); $th->thread; my @args = ( "$title" . - '' . + '' . '

');
 	push @args, $feed_opts->{midurl};
 	dump_html_line($_, 0, \@args) for $th->rootset;
@@ -217,7 +217,7 @@ 		$from = $from[0]->name;
 		(defined($from) && length($from)) or $from = $from[0]->address;
 		$from = escapeHTML($from);
 		$subj = escapeHTML($subj);
-		$args->[0] .= "`-> $subj $from\n";
+		$args->[0] .= "`-> $subj $from\n";
 	} else {
 		$args->[0] .= "[ Message not available ]\n";
 	}
diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm
index 9237f32309e4f0ff3ba908359a01a90ef2cdc86d..7c92cbab7aaf4398b2d5e2d8a4e6a812e655df92 100644
--- a/lib/PublicInbox/View.pm
+++ b/lib/PublicInbox/View.pm
@@ -83,8 +83,8 @@ 			do {
 				$cur .= shift(@sum) . ' ';
 			} while (@sum && length($cur) < 68);
 			$cur=~ s/ \z/ .../;
-			"> <$cur<\/a>>";
+			"> <$cur<\/a>>";
 		} else {
 			$cur;
 		}
@@ -140,14 +140,15 @@
 	my $mid = $simple->header('Message-ID');
 	if (defined $mid) {
 		my ($html, $href) = trim_message_id($mid);
-		$rv .= "Message-ID: $html ";
-		$rv .= "(original)\n";
+		$rv .= "Message-ID: <$html> ";
+		$rv .= "(original)\n";
 	}
 
 	my $irp = $simple->header('In-Reply-To');
 	if (defined $irp) {
 		my ($html, $href) = trim_message_id($irp);
-		$rv .= "In-Reply-To: $html\n";
+		$rv .= "In-Reply-To: <";
+		$rv .= "$html>\n";
 	}
 	$rv .= "\n";
 
diff --git a/t/view.t b/t/view.t
index ad79c413084f9d97726769ea19a3bc4f60fd2e68..ef1b74c940c5dc747a677598ec94daefe7d7f6d8 100644
--- a/t/view.t
+++ b/t/view.t
@@ -33,7 +33,7 @@ 	$s = Email::MIME->new($s->as_string);
 	my $html = PublicInbox::View->as_html($s);
 
 	# ghetto
-	like($html, qr/]+>> Long and wordy/,
@@ -44,7 +44,7 @@ 	my $pfx = "http://example.com/test/f";
 	my $short = PublicInbox::View->as_html($s, $pfx);
 	like($short, qr/\n> keep this inline/,
 		"short quoted text is inline");
-	like($short, qr/]+>Long and wordy/,
+	like($short, qr/