summaryrefslogtreecommitdiff
path: root/tex/context/third/transliterator/trans_tables_gr.lua
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/third/transliterator/trans_tables_gr.lua')
-rw-r--r--tex/context/third/transliterator/trans_tables_gr.lua19
1 files changed, 2 insertions, 17 deletions
diff --git a/tex/context/third/transliterator/trans_tables_gr.lua b/tex/context/third/transliterator/trans_tables_gr.lua
index bed775a..084478d 100644
--- a/tex/context/third/transliterator/trans_tables_gr.lua
+++ b/tex/context/third/transliterator/trans_tables_gr.lua
@@ -644,23 +644,8 @@ translit.tables["Greek transliteration archaic characters"] = translit.gr_other
function translit.dogreek (mode, text)
local P, R, S, V, Cs = lpeg.P, lpeg.R, lpeg.S, lpeg.V, lpeg.Cs
-
-
- -- http://lua-users.org/lists/lua-l/2009-06/msg00343.html
- local utfchar = R("\000\127") +
- R("\194\223") * R("\128\191") +
- R("\224\240") * R("\128\191") * R("\128\191") +
- R("\241\244") * R("\128\191") * R("\128\191") * R("\128\191")
-
- -- Add keys of a dictionary to a ruleset.
- function addrules (dict, rules)
- for i, _ in pairs(dict) do
- if rules == nil then rules = P(i)
- else rules = rules + P(i)
- end
- end
- return rules
- end
+ local addrules = translit.addrules
+ local utfchar = lpeg.patterns.utf8char
if mode == "gr" or mode == "gr_n" then