my $tail = $2;
if (length($tail) > 4) {
$tail = " ...";
- $body =~ s/&[^;]$//; # remove chopped character entities
+ $body =~ s/&[^;]*$//; # remove chopped character entities
}
return "$body$tail";
}
git_print_page_path($file_name, $ftype);
open my $fd, "-|",
- $GIT, "rev-list", "--full-history", $hash_base, "--", "\'$file_name\'";
+ $GIT, "rev-list", "--full-history", $hash_base, "--", $file_name;
print "<table cellspacing=\"0\">\n";
my $alternate = 0;
while (my $line = <$fd>) {