diff options
-rwxr-xr-x | git-debrebase | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/git-debrebase b/git-debrebase index bcf49de..0ff3ea5 100755 --- a/git-debrebase +++ b/git-debrebase @@ -155,26 +155,26 @@ sub get_differs ($$) { my $f; my $rundiff = sub { - my ($sfx, $fn) = @_; + my ($opts, $sfx, $fn) = @_; my @cmd = (@git, qw(diff-tree -z --no-renames --name-only)); push @cmd "$_:$sfx" foreach $x, $y; my $diffs = cmdoutput @bcmd, $x, $y; foreach $f (split /\0/, $diffs) { $fn->(); } }; - $rundiff('', sub { + $rundiff([], '', sub { $differs |= $f eq 'debian' ? D_DEB : D_UPS; }); if ($differs & D_DEB) { $differs &= ~D_DEB; - $rundiff(':debian', sub { + $rundiff([], ':debian', sub { $differs |= $f eq 'patches' ? D_PAT_OTH : D_DEB; }); } if ($differs & D_PAT_OTH) { - $rundiff(':debian/patches', sub { + $rundiff([], ':debian/patches', sub { }); |