* scripts/Dpkg/Source/Patch.pm: Bugfix: use return instead of next in function.

diff --git a/scripts/Dpkg/Source/Patch.pm b/scripts/Dpkg/Source/Patch.pm
index b272124fc83ddb6629d0ef659be327191586d305..2135be0d1be5b9b2726253f173e91cdd7106666f 100644 (file)
--- a/scripts/Dpkg/Source/Patch.pm
+++ b/scripts/Dpkg/Source/Patch.pm
@@ -140,7 +140,7 @@ sub add_diff_directory {
     my %files_in_new;
     my $scan_new = sub {
         my $fn = File::Spec->abs2rel($_, $new);
-        next if &$diff_ignore($fn);
+        return if &$diff_ignore($fn);
         $files_in_new{$fn} = 1;
         lstat("$new/$fn") || syserr(_g("cannot stat file %s"), "$new/$fn");
         my $mode = S_IMODE((lstat(_))[2]);