Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
our $git_authline_re = '^([^<>]+) \<(\S+)\> (\d+ [-+]\d+)$';
our $splitbraincache = 'dgit-intern/quilt-cache';
-our $rewritemap = 'dgit-rewrite-map';
+our $rewritemap = 'dgit-rewrite/map';
our (@git) = qw(git);
our (@dget) = qw(dget);
my ($obj, $type, $refname) =
$rline =~ m/^(\w+)\s+(\w+)\s+(\S.*)/
or die "$_ ?";
- if ($refname eq 'refs/dgit-rewrite-map') {
+ if ($refname eq 'refs/dgit-rewrite/map') {
$org_rewrite_map = $obj;
continue;
}
if ($bare eq 'true') {
my $new_rewrite_map = edit_rewrite_map($org_rewrite_map);
- push @updates, [ 'refs/dgit-rewrite-map',
+ push @updates, [ 'refs/dgit-rewrite/map',
($org_rewrite_map // '0'x40),
$new_rewrite_map ];
}