Index: source/data/translit/el_Title.txt |
diff --git a/source/data/translit/el_Title.txt b/source/data/translit/el_Title.txt |
index 748b32e85e2d343dada5cf735183b3e18bb2ff7f..95b4fe95b7e4223af46706d52a32bdffacc38574 100644 |
--- a/source/data/translit/el_Title.txt |
+++ b/source/data/translit/el_Title.txt |
@@ -1,15 +1,18 @@ |
-# *************************************************************************** |
-# * |
-# * Copyright (C) 2004-2015, International Business Machines |
-# * Corporation; Unicode, Inc.; and others. All Rights Reserved. |
-# * |
-# *************************************************************************** |
+# © 2016 and later: Unicode, Inc. and others. |
+# License & terms of use: http://www.unicode.org/copyright.html#License |
+# |
# File: el_Title.txt |
-# Generated from CLDR |
+# Generated from CLDR |
# |
+ |
::NFD(); |
+# Remove \0301 following Greek, with possible intervening 0308 marks. |
+# [[:Greek:] & [:Ll:]] [\u0308]? { \u0301 → ; |
+# Make any string of letters after a cased letter be lower, with rules for sigma |
[:cased:] [:case-ignorable:]* { Σ } [:case-ignorable:]* [:cased:] → σ; |
[:cased:] [:case-ignorable:]* { Σ → ς; |
[:cased:] [:case-ignorable:]* { (.) → &Any-Lower($1) ; |
+# Otherwise all lowercase go to upper (titlecase stay as is) |
([:Lowercase:]) → &Any-Title($1) ; |
::NFC(); |
+ |