File tree Expand file tree Collapse file tree 1 file changed +6
-5
lines changed Expand file tree Collapse file tree 1 file changed +6
-5
lines changed Original file line number Diff line number Diff line change @@ -5222,11 +5222,6 @@ Perl_init_i18nl10n(pTHX_ int printwarn)
5222
5222
STATIC void
5223
5223
S_compute_collxfrm_coefficients (pTHX )
5224
5224
{
5225
- PL_in_utf8_COLLATE_locale = (PL_collation_standard )
5226
- ? 0
5227
- : is_locale_utf8 (PL_collation_name );
5228
- PL_strxfrm_NUL_replacement = '\0' ;
5229
- PL_strxfrm_max_cp = 0 ;
5230
5225
5231
5226
/* A locale collation definition includes primary, secondary, tertiary,
5232
5227
* etc. weights for each character. To sort, the primary weights are
@@ -5289,6 +5284,12 @@ S_compute_collxfrm_coefficients(pTHX)
5289
5284
char * x_shorter ; /* We also transform a substring of 'longer' */
5290
5285
Size_t x_len_shorter ;
5291
5286
5287
+ PL_in_utf8_COLLATE_locale = (PL_collation_standard )
5288
+ ? 0
5289
+ : is_locale_utf8 (PL_collation_name );
5290
+ PL_strxfrm_NUL_replacement = '\0' ;
5291
+ PL_strxfrm_max_cp = 0 ;
5292
+
5292
5293
/* mem_collxfrm_() is used get the transformation (though here we
5293
5294
* are interested only in its length). It is used because it has
5294
5295
* the intelligence to handle all cases, but to work, it needs some
You can’t perform that action at this time.
0 commit comments