diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-03-19 19:00:24 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-03-19 19:00:24 +0000 |
commit | 7a96905d3da8de6ba1555acfb649c10d7a4bbd29 (patch) | |
tree | af1ca89b0b7ca646990115eeb0c83196a9755af0 | |
parent | 267514893ae4c1fbb0eecc792c72ab72e93a3066 (diff) | |
download | perl_checker-7a96905d3da8de6ba1555acfb649c10d7a4bbd29.tar perl_checker-7a96905d3da8de6ba1555acfb649c10d7a4bbd29.tar.gz perl_checker-7a96905d3da8de6ba1555acfb649c10d7a4bbd29.tar.bz2 perl_checker-7a96905d3da8de6ba1555acfb649c10d7a4bbd29.tar.xz perl_checker-7a96905d3da8de6ba1555acfb649c10d7a4bbd29.zip |
(is_blacklisted) blacklist 'can' & 'isa' keywords
(else Glib fake packages provides isa() and perl_checker declares bogus
"too many parameters" warnings on eg any.pm)
-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 46c9253..e0f4c3b 100755 --- a/fake_packages/gen.pl +++ b/fake_packages/gen.pl @@ -7,7 +7,7 @@ my ($current_package, $current_prefix, $current_name); sub is_blacklisted { my ($name, $para) = @_; - member($name, qw(print use)); + member($name, qw(can isa print use)); } |