avoid calling getctime on internal pages

internal pages won't be in revision control so this avoids some ugly noise
master
Joey Hess 2008-02-24 18:02:34 -05:00
parent 154532b278
commit f4773f6a83
1 changed files with 9 additions and 9 deletions

View File

@ -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));
}