diff options
| author | Karl Williamson <public@khwilliamson.com> | 2012-03-05 19:33:50 -0700 |
|---|---|---|
| committer | Ricardo Signes <rjbs@cpan.org> | 2012-03-23 10:10:28 -0400 |
| commit | 424313d48c16a7a9ce5a6341b6f65914fbddf259 (patch) | |
| tree | 0d195f877aad59a2063014330275e900a13362bd /t | |
| parent | 7476a79c8db21237e6b6bcf579243fdfc880f8b9 (diff) | |
| download | perl-424313d48c16a7a9ce5a6341b6f65914fbddf259.tar.gz | |
PATCH: [perl #11560] extraneous msg in viacode
This refactors to test for the hash element being defined before
attempting to use it.
Diffstat (limited to 't')
| -rw-r--r-- | t/lib/charnames/alias | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/t/lib/charnames/alias b/t/lib/charnames/alias index fb1a914fda..75280be7b3 100644 --- a/t/lib/charnames/alias +++ b/t/lib/charnames/alias @@ -338,3 +338,11 @@ charnames::viacode(0x41); EXPECT OPTIONS regex $ +######## +# NAME no extraneous warning [perl #11560] +use warnings; +use charnames (); +print charnames::viacode(0x80), "\n"; +EXPECT +OPTIONS regex +PADDING CHARACTER |