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 | 88c8deff5e66aac6871427eb9ba29fd40fb5710f (patch) | |
| tree | af1ca89b0b7ca646990115eeb0c83196a9755af0 | |
| parent | ef700ea36e3005c048e9b87bfd9b6436fbb69459 (diff) | |
| download | perl_checker-88c8deff5e66aac6871427eb9ba29fd40fb5710f.tar perl_checker-88c8deff5e66aac6871427eb9ba29fd40fb5710f.tar.gz perl_checker-88c8deff5e66aac6871427eb9ba29fd40fb5710f.tar.bz2 perl_checker-88c8deff5e66aac6871427eb9ba29fd40fb5710f.tar.xz perl_checker-88c8deff5e66aac6871427eb9ba29fd40fb5710f.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)); } |