diff options
| author | Karl Williamson <khw@cpan.org> | 2021-04-12 05:34:25 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2022-08-18 09:04:15 -0600 |
| commit | 018fd0878abccef4bd5f799835639efe22eb5644 (patch) | |
| tree | cf8cc90687441f8faf6d1291286df8ba0f26229a /t/loc_tools.pl | |
| parent | 89458b6ae589a4ac912612a3f4cbae42a8113cb7 (diff) | |
| download | perl-018fd0878abccef4bd5f799835639efe22eb5644.tar.gz | |
t/loc_tools.pl: Turn off warnings in a timely manner
It doesn't matter much, but some warnings might be output by doing the
'use locale' before turning off warnings.
Diffstat (limited to 't/loc_tools.pl')
| -rw-r--r-- | t/loc_tools.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/loc_tools.pl b/t/loc_tools.pl index 48ff097efc..bcc54e2c4f 100644 --- a/t/loc_tools.pl +++ b/t/loc_tools.pl @@ -560,8 +560,8 @@ sub is_locale_utf8 ($) { # Return a boolean as to if core Perl thinks the input my $locale = shift; - use locale; no warnings 'locale'; # We may be trying out a weird locale + use locale; my $save_locale = setlocale(&POSIX::LC_CTYPE()); if (! $save_locale) { |