optimise svn log a bit
parent
f4d6635512
commit
7bbfbf82fb
2
ikiwiki
2
ikiwiki
|
@ -504,7 +504,7 @@ sub rcs_recentchanges ($) { #{{{
|
||||||
my $infoline=qr/^r(\d+)\s+\|\s+([^\s]+)\s+\|\s+(\d+-\d+-\d+\s+\d+:\d+:\d+\s+[-+]?\d+).*/;
|
my $infoline=qr/^r(\d+)\s+\|\s+([^\s]+)\s+\|\s+(\d+-\d+-\d+\s+\d+:\d+:\d+\s+[-+]?\d+).*/;
|
||||||
my $state='start';
|
my $state='start';
|
||||||
my ($rev, $user, $when, @pages, @message);
|
my ($rev, $user, $when, @pages, @message);
|
||||||
foreach (`LANG=C svn log -v '$svn_url'`) {
|
foreach (`LANG=C svn log --limit $num -v '$svn_url'`) {
|
||||||
chomp;
|
chomp;
|
||||||
if ($state eq 'start' && /$div/) {
|
if ($state eq 'start' && /$div/) {
|
||||||
$state='header';
|
$state='header';
|
||||||
|
|
Loading…
Reference in New Issue