X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FViewDiff.pm;h=e9cfc3687ba392f2858f7570908196af75163e2f;hb=1a67b91c1326efa372d1ec957e2494849d894f0b;hp=6b8d94372405486ca2223e0fc057e79cb24691ac;hpb=b6f480ed58abc5ae2a426ef4f792621b9d3cf283;p=public-inbox.git diff --git a/lib/PublicInbox/ViewDiff.pm b/lib/PublicInbox/ViewDiff.pm index 6b8d9437..e9cfc368 100644 --- a/lib/PublicInbox/ViewDiff.pm +++ b/lib/PublicInbox/ViewDiff.pm @@ -141,8 +141,14 @@ sub flush_diff ($$$) { my $spfx = $ctx->{-spfx}; my $state = DSTATE_INIT; my $dctx = { Q => '' }; # {}, keys: oid_a, oid_b, path_a, path_b + my $dpfx = $ctx->{-dpfx}; # leading spaces for interdiff + my $dpfx_re = qr/\A$dpfx/ if defined $dpfx; foreach my $s (@$diff) { + if (defined($dpfx)) { + $s =~ s/$dpfx_re//; + $$dst .= $dpfx; + } if ($s =~ /^---$/) { to_state($dst, $state, DSTATE_STAT); $$dst .= $s;