diff options
Diffstat (limited to 'gnu/usr.bin/perl/regen/lib_cleanup.pl')
-rw-r--r-- | gnu/usr.bin/perl/regen/lib_cleanup.pl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gnu/usr.bin/perl/regen/lib_cleanup.pl b/gnu/usr.bin/perl/regen/lib_cleanup.pl index 3ba86f99c93..b30f79010a5 100644 --- a/gnu/usr.bin/perl/regen/lib_cleanup.pl +++ b/gnu/usr.bin/perl/regen/lib_cleanup.pl @@ -74,6 +74,12 @@ foreach my $file (@ext) { $package = $1; last; } + elsif (/^\s*package\s*$/) { + # If they're hiding their package name, we ignore them + ++$ignore{"/$path"}; + $package=''; + last; + } } close $fh or die "Can't close $file: $!"; |