fix rcs_getctime to return first, not last, change time
This was being buggy and returning the file's last change time, not its creation time. (I checked all the others (except tla) and they're ok.)master
parent
2c86616a6a
commit
a2c0423e54
|
@ -594,8 +594,8 @@ sub rcs_getctime ($) {
|
||||||
# Remove srcdir prefix
|
# Remove srcdir prefix
|
||||||
$file =~ s/^\Q$config{srcdir}\E\/?//;
|
$file =~ s/^\Q$config{srcdir}\E\/?//;
|
||||||
|
|
||||||
my $sha1 = git_sha1($file);
|
my @sha1s = run_or_non('git', 'rev-list', 'HEAD', '--', $file);
|
||||||
my $ci = git_commit_info($sha1, 1);
|
my $ci = git_commit_info($sha1s[$#sha1s], 1);
|
||||||
my $ctime = $ci->{'author_epoch'};
|
my $ctime = $ci->{'author_epoch'};
|
||||||
debug("ctime for '$file': ". localtime($ctime));
|
debug("ctime for '$file': ". localtime($ctime));
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue