avoid calling getctime on internal pages
internal pages won't be in revision control so this avoids some ugly noisemaster
parent
154532b278
commit
f4773f6a83
|
@ -330,17 +330,17 @@ sub refresh () { #{{{
|
|||
}
|
||||
else {
|
||||
push @add, $file;
|
||||
}
|
||||
$pagecase{lc $page}=$page;
|
||||
if ($config{getctime} && -e "$config{srcdir}/$file") {
|
||||
eval {
|
||||
my $time=rcs_getctime("$config{srcdir}/$file");
|
||||
$pagectime{$page}=$time;
|
||||
};
|
||||
if ($@) {
|
||||
print STDERR $@;
|
||||
if ($config{getctime} && -e "$config{srcdir}/$file") {
|
||||
eval {
|
||||
my $time=rcs_getctime("$config{srcdir}/$file");
|
||||
$pagectime{$page}=$time;
|
||||
};
|
||||
if ($@) {
|
||||
print STDERR $@;
|
||||
}
|
||||
}
|
||||
}
|
||||
$pagecase{lc $page}=$page;
|
||||
if (! exists $pagectime{$page}) {
|
||||
$pagectime{$page}=mtime(srcfile($file));
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue