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"