1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
|
<?php
/**
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License along
* with this program; if not, write to the Free Software Foundation, Inc.,
* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
* http://www.gnu.org/copyleft/gpl.html
*
* @file
*/
/**
* Workaround for incorrect collation of Estonian language ('et') in ICU (T56168).
*
* 'W' and 'V' should not be considered the same letter for the purposes of collation in modern
* Estonian. We work around this by replacing 'W' and 'w' with 'ᴡ' U+1D21 'LATIN LETTER SMALL
* CAPITAL W' for sortkey generation, which is collated like 'W' and is not tailored to have the
* same primary weight as 'V' in Estonian.
*
* @since 1.24
*/
class CollationEt extends IcuCollation {
public function __construct() {
parent::__construct( 'et' );
}
private static function mangle( $string ) {
return str_replace(
[ 'w', 'W' ],
'ᴡ', // U+1D21 'LATIN LETTER SMALL CAPITAL W'
$string
);
}
private static function unmangle( $string ) {
// Casing data is lost…
return str_replace(
'ᴡ', // U+1D21 'LATIN LETTER SMALL CAPITAL W'
'W',
$string
);
}
public function getSortKey( $string ) {
return parent::getSortKey( self::mangle( $string ) );
}
public function getFirstLetter( $string ) {
return self::unmangle( parent::getFirstLetter( self::mangle( $string ) ) );
}
}
|