my $div=qr/^--------------------+$/;
my $state='start';
my ($rev, $user, $when, @pages, @message);
- foreach (`LANG=C svn log --limit $num -v '$svn_url'`) {
+ foreach (`LANG=C svn log -v '$svn_url'`) {
chomp;
if ($state eq 'start' && /$div/) {
$state='header';
eval q{use Date::Parse};
foreach my $page (keys %pagectime) {
my $file="$config{srcdir}/$pagesources{$page}";
+ next unless -e $file;
my $child = open(SVNLOG, "-|");
if (! $child) {
exec("svn", "log", $file) || error("svn log $file failed to run");