summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIan Jackson <ijackson@chiark.greenend.org.uk>2017-01-06 18:08:52 +0000
committerIan Jackson <ijackson@chiark.greenend.org.uk>2017-01-06 18:32:14 +0000
commitfad2273acdda6c4343cd9c27f037cd3fb64d7c6d (patch)
tree0de61e70857f97f419bb8df41e1d65316a7aef8c
parent254a2c58e582e4536ef7a8feada775139e7ca9d5 (diff)
dgit-badcommit-fixup: Debugging (commented out)
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
-rwxr-xr-xdgit-badcommit-fixup3
1 files changed, 2 insertions, 1 deletions
diff --git a/dgit-badcommit-fixup b/dgit-badcommit-fixup
index bab8605..98720e5 100755
--- a/dgit-badcommit-fixup
+++ b/dgit-badcommit-fixup
@@ -79,7 +79,6 @@ sub rewrite_commit ($) {
my $m = \ $memo{$obj};
return $$m if defined $$m;
my $olddata = getobj $obj, 'commit';
-#print STDERR ">$obj|$olddata<\n";
$olddata =~ m/(?<=\n)(?=\n)/ or die "$obj ?";
my $msg = $';
local $_ = $`;
@@ -98,8 +97,10 @@ sub rewrite_commit ($) {
if ($newdata eq $olddata) {
$newobj = $obj;
$count{unchanged}++;
+#print STDERR "UNCHANGED $obj\n";
} else {
$newobj = hashobj $newdata, 'commit';
+#print STDERR "REWRITTEN $obj $newobj\n";
}
$$m= $newobj;
return $newobj;