Get revision date from Darcs

This commit is contained in:
Andrew Johnson
2022-08-23 13:06:44 -05:00
parent 1fa98d489f
commit a373327b59

View File

@@ -56,7 +56,8 @@ if (!$vcs && -d "$opt_t/_darcs") { # Darcs
my $hasmod = `darcs whatsnew --repodir="$opt_t" -l`;
$opt_V .= '-dirty' unless $?;
}
$cv = ""; # ToDo
$cv = `darcs log --last 1`;
$cv =~ s/\A .* Date: \s+ (\N+) .* \z/$1/sx;
}
if (!$vcs && -d "$opt_t/.hg") { # Mercurial
print "== Found <top>/.hg directory\n" if $opt_v;