This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
locale.c: Fix typo in #ifdef
authorKarl Williamson <khw@cpan.org>
Mon, 30 Nov 2020 16:25:52 +0000 (09:25 -0700)
committerKarl Williamson <khw@cpan.org>
Fri, 4 Dec 2020 21:43:12 +0000 (14:43 -0700)
This misspelling led to the code assuming that the platform didn't have
a feature that, if used, would result in faster execution.

locale.c

index 9500ab7..5970423 100644 (file)
--- a/locale.c
+++ b/locale.c
@@ -2621,7 +2621,7 @@ S_my_nl_langinfo(const int item, bool toggle)
 #if defined(HAS_NL_LANGINFO) /* nl_langinfo() is available.  */
 #  if   ! defined(HAS_THREAD_SAFE_NL_LANGINFO_L)      \
      || ! defined(HAS_POSIX_2008_LOCALE)              \
-     || ! defined(DUPLOCALE)
+     || ! defined(HAS_DUPLOCALE)
 
     /* Here, use plain nl_langinfo(), switching to the underlying LC_NUMERIC
      * for those items dependent on it.  This must be copied to a buffer before