summaryrefslogtreecommitdiff
path: root/locale.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2022-10-22 08:08:35 -0600
committerKarl Williamson <khw@cpan.org>2022-10-24 07:26:44 -0600
commitbd622d03617ab964e388f5b5ff1a0a3723a22926 (patch)
tree6399de1deea9010b5233c582d7140a2bf3ca4225 /locale.c
parentfd7d660c0375d3fd51d1ce88edcd4e32ee899953 (diff)
downloadperl-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.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/locale.c b/locale.c
index bfeace81ef..9d86487a9a 100644
--- a/locale.c
+++ b/locale.c
@@ -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"