chiark
/
gitweb
/
~ianmdlvl
/
dgit.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
254a2c5
)
dgit-badcommit-fixup: Debugging (commented out)
author
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Fri, 6 Jan 2017 18:08:52 +0000
(18:08 +0000)
committer
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Fri, 6 Jan 2017 18:32:14 +0000
(18:32 +0000)
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
dgit-badcommit-fixup
patch
|
blob
|
history
diff --git
a/dgit-badcommit-fixup
b/dgit-badcommit-fixup
index bab8605aed270ea83d96f8f3c47ea8896b96fd10..98720e57d6eb2f67bfdf6b644b17a80b456c41e5 100755
(executable)
--- 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;