From: Nicholas Clark Date: Fri, 23 Oct 2009 20:30:43 +0000 (+0100) Subject: In Locale::Maketext, avoid using defined @array and defined %hash. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9e20cf84778bac51ffe94978daf563a46792580a;p=p5sagit%2Fp5-mst-13.2.git In Locale::Maketext, avoid using defined @array and defined %hash. --- diff --git a/dist/Locale-Maketext/lib/Locale/Maketext.pm b/dist/Locale-Maketext/lib/Locale/Maketext.pm index eda9e97..1bfbbc9 100644 --- a/dist/Locale-Maketext/lib/Locale/Maketext.pm +++ b/dist/Locale-Maketext/lib/Locale/Maketext.pm @@ -10,7 +10,7 @@ use I18N::LangTags 0.30 (); BEGIN { unless(defined &DEBUG) { *DEBUG = sub () {0} } } # define the constant 'DEBUG' at compile-time -$VERSION = '1.13'; +$VERSION = '1.14'; @ISA = (); $MATCH_SUPERS = 1; @@ -401,7 +401,7 @@ sub _try_use { # Basically a wrapper around "require Modulename" my $module = $_[0]; # ASSUME sane module name! { no strict 'refs'; return($tried{$module} = 1) - if defined(%{$module . '::Lexicon'}) or defined(@{$module . '::ISA'}); + if %{$module . '::Lexicon'} or @{$module . '::ISA'}; # weird case: we never use'd it, but there it is! }