In perl.git, the branch smoke-me/khw-turkish has been updated <https://perl5.git.perl.org/perl.git/commitdiff/bfd501b7180e039c7b1a485d21c620d7a7e0d268?hp=c7964c061e78c59f5f4fec9f57d173dda2943c26>
- Log ----------------------------------------------------------------- commit bfd501b7180e039c7b1a485d21c620d7a7e0d268 Author: Karl Williamson <[email protected]> Date: Wed Jan 30 21:23:55 2019 -0700 win32 ----------------------------------------------------------------------- Summary of changes: pp.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/pp.c b/pp.c index f195b55dd6..b79a880dba 100644 --- a/pp.c +++ b/pp.c @@ -4196,16 +4196,16 @@ PP(pp_uc) Size_t extra; *d = toUPPER_LATIN1_MOD(*s); - if (LIKELY( *d != LATIN_SMALL_LETTER_Y_WITH_DIAERESIS + if ( LIKELY(*d != LATIN_SMALL_LETTER_Y_WITH_DIAERESIS) #ifdef USE_LOCALE_CTYPE - && (LIKELY( ! PL_in_utf8_turkic_locale - || ! IN_LC_RUNTIME(LC_CTYPE)) - || *s != 'i') + && (LIKELY( ! PL_in_utf8_turkic_locale + || ! IN_LC_RUNTIME(LC_CTYPE)) + || *s != 'i') #endif - )) { + ) { continue; } -- Perl5 Master Repository
