This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove uncompilable code
authorKarl Williamson <khw@cpan.org>
Wed, 15 Nov 2017 05:27:06 +0000 (22:27 -0700)
committerKarl Williamson <khw@cpan.org>
Wed, 31 Jan 2018 05:22:07 +0000 (22:22 -0700)
This code was never compiled because of a misspelling in the #ifdef.
No problem surfaced, so just remove it.  The next commit adds a different
check.

mg.c

diff --git a/mg.c b/mg.c
index 64e450f..c6e68d6 100644 (file)
--- a/mg.c
+++ b/mg.c
@@ -829,13 +829,7 @@ S_fixup_errno_string(pTHX_ SV* sv)
 
 #ifdef USE_LOCALE_MESSAGES
 
-            &&   _is_cur_LC_category_utf8(LC_MESSAGES)
-
-#elif defined(USE_LOCLAE_CTYPE)
-
-                 /* For systems that don't have a separate message category,
-                  * this assumes that they follow the CTYPE one */
-            &&   _is_cur_LC_category_utf8(LC_CTYPE)
+            &&  _is_cur_LC_category_utf8(LC_MESSAGES)
 
 #endif