my @new_epochs;
my $fetch_each_epoch = sub {
- my $mf = "$tmpdir/m/manifest.js.gz";
- if (my @st = stat($mf)) {
- utime($st[8], $st[9] - 1, $mf) or xbail "utime $mf: $!";
- }
my %before = map { $_ => 1 } glob("$tmpdir/m/git/*");
run_script([qw(-fetch -q)], undef, {-C => "$tmpdir/m"}) or
xbail '-fetch fail';