diff options
| -rwxr-xr-x | fake_packages/gen.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fake_packages/gen.pl b/fake_packages/gen.pl index 527636b..8390534 100755 --- a/fake_packages/gen.pl +++ b/fake_packages/gen.pl @@ -6,7 +6,7 @@ use MDK::Common; my ($current_package, $current_prefix, $current_name); sub is_blacklisted { - my ($name, $para) = @_; + my ($name) = @_; member($name, qw(can isa print use)); } |