diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2017-01-06 18:08:52 +0000 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2017-01-06 18:32:14 +0000 |
commit | fad2273acdda6c4343cd9c27f037cd3fb64d7c6d (patch) | |
tree | 0de61e70857f97f419bb8df41e1d65316a7aef8c /dgit-badcommit-fixup | |
parent | 254a2c58e582e4536ef7a8feada775139e7ca9d5 (diff) |
dgit-badcommit-fixup: Debugging (commented out)
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
Diffstat (limited to 'dgit-badcommit-fixup')
-rwxr-xr-x | dgit-badcommit-fixup | 3 |
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; |