diff options
| author | Hans Hagen <pragma@wxs.nl> | 2018-12-17 18:19:48 +0100 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2018-12-17 18:19:48 +0100 |
| commit | 15b67b20aa0d6c508578d0ca8cbdcd9cff9829a8 (patch) | |
| tree | d656b4161487a8c54d954458084914c7d408aca7 /tex/context/base/mkiv/char-ini.lua | |
| parent | 5bb786877a5617fb8fbe3fd0e7b54fbcea3ce002 (diff) | |
| download | context-15b67b20aa0d6c508578d0ca8cbdcd9cff9829a8.tar.gz | |
2018-12-17 16:49:00
Diffstat (limited to 'tex/context/base/mkiv/char-ini.lua')
| -rw-r--r-- | tex/context/base/mkiv/char-ini.lua | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/tex/context/base/mkiv/char-ini.lua b/tex/context/base/mkiv/char-ini.lua index 1e8c1f7d3..62e509151 100644 --- a/tex/context/base/mkiv/char-ini.lua +++ b/tex/context/base/mkiv/char-ini.lua @@ -1287,6 +1287,8 @@ function characters.lower (str) return str and lpegmatch(utf8lower,str) or "" en function characters.upper (str) return str and lpegmatch(utf8upper,str) or "" end function characters.shaped(str) return str and lpegmatch(utf8shape,str) or "" end +lpeg.setutfcasers(characters.lower,characters.upper) + -- local str = [[ -- ÀÁÂÃÄÅàáâãäå àáâãäåàáâãäå ÀÁÂÃÄÅÀÁÂÃÄÅ AAAAAAaaaaaa -- ÆÇæç æçæç ÆÇÆÇ AECaec |