diff options
author | Karl Williamson <khw@cpan.org> | 2022-10-22 08:08:35 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2022-10-24 07:26:44 -0600 |
commit | bd622d03617ab964e388f5b5ff1a0a3723a22926 (patch) | |
tree | 6399de1deea9010b5233c582d7140a2bf3ca4225 /locale.c | |
parent | fd7d660c0375d3fd51d1ce88edcd4e32ee899953 (diff) | |
download | perl-bd622d03617ab964e388f5b5ff1a0a3723a22926.tar.gz |
locale.c: Remove redundant conditional
This conditional is already known to be true from the 'if' just above
Diffstat (limited to 'locale.c')
-rw-r--r-- | locale.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2350,7 +2350,7 @@ S_new_ctype(pTHX_ const char *newctype) if ( (UNLIKELY(bad_count)) && (LIKELY(ckWARN_d(WARN_LOCALE)) || UNLIKELY(DEBUG_L_TEST))) { - if (UNLIKELY(bad_count) && PL_in_utf8_CTYPE_locale) { + if (PL_in_utf8_CTYPE_locale) { PL_warn_locale = Perl_newSVpvf(aTHX_ "Locale '%s' contains (at least) the following characters" " which have\nunexpected meanings: %s\nThe Perl program" |