$clogp->{Changes}
-# imported by dgit from the archive
+# imported from the archive
END
close C or die $!;
my $commithash = cmdoutput @git, qw(hash-object -w -t commit ../commit.tmp);
sub is_fast_fwd ($$) {
my ($ancestor,$child) = @_;
- my $mb = cmdoutput @git, qw(merge-base), $dsc_hash, $upload_hash;
+ my $mb = cmdoutput @git, qw(merge-base), $ancestor, $child;
return rev_parse($mb) eq rev_parse($ancestor);
}