my $rewrite;
if ($type eq 'commit') {
$rewrite = rewrite_commit($obj);
-print STDERR "RW? $refname $obj $rewrite\n";
if ($refname =~ m{^refs/dgit/[^/]+$} &&
$rewrite ne $obj) {
-print STDERR "RW $refname\n";
$rewrite = rewrite_commit_adddummy $refname, $obj, $rewrite;
}
} elsif ($type eq 'tag') {
our $worktree;
-print Dumper(\@updates);
+#print Dumper(\@updates);
open U, "|git update-ref -m 'dgit bad commit fixup' --stdin" or die $!;