diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-09-16 14:06:59 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-09-16 14:07:52 +0200 |
commit | 37088f0067a2d74519291fa483e414728e06987d (patch) | |
tree | f5c054aec44cabad008d6837e6a290b6f64479f3 /fake_packages | |
parent | d29fb1555c99c5256f5ca0e4a37d16d513b051c9 (diff) | |
download | perl_checker-37088f0067a2d74519291fa483e414728e06987d.tar perl_checker-37088f0067a2d74519291fa483e414728e06987d.tar.gz perl_checker-37088f0067a2d74519291fa483e414728e06987d.tar.bz2 perl_checker-37088f0067a2d74519291fa483e414728e06987d.tar.xz perl_checker-37088f0067a2d74519291fa483e414728e06987d.zip |
help perl_checker
it doesn't like package names starting with numbers :-(
Diffstat (limited to 'fake_packages')
-rw-r--r-- | fake_packages/Encode.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fake_packages/Encode.pm b/fake_packages/Encode.pm index bb9c2de..0e84621 100644 --- a/fake_packages/Encode.pm +++ b/fake_packages/Encode.pm @@ -107,7 +107,7 @@ sub euc_jis() {} sub jis_euc() {} sub needs_lines() {} -package Encode::KR::2022_KR; +package Encode::KR::_2022_KR; our @ISA = qw(); sub decode { my ($_obj, $_str, $_o_chk) = @_ } sub encode { my ($_obj, $_utf8, $_o_chk) = @_ } |