diff options
author | Marius <mariausol@gmail.com> | 2012-11-17 00:40:17 +0200 |
---|---|---|
committer | Marius <mariausol@gmail.com> | 2012-11-17 00:40:17 +0200 |
commit | 4f08d2072378de7bac2c7992876b8f7012f7be78 (patch) | |
tree | 0aebf48720f39263c5ac560eb06e04868e834e4c /tex/generic/context/luatex/luatex-languages.lua | |
parent | 3382ca3f799611af1b4713caa81f67c925665cc3 (diff) | |
download | context-4f08d2072378de7bac2c7992876b8f7012f7be78.tar.gz |
beta 2012.11.16 23:27
Diffstat (limited to 'tex/generic/context/luatex/luatex-languages.lua')
-rw-r--r-- | tex/generic/context/luatex/luatex-languages.lua | 45 |
1 files changed, 45 insertions, 0 deletions
diff --git a/tex/generic/context/luatex/luatex-languages.lua b/tex/generic/context/luatex/luatex-languages.lua new file mode 100644 index 000000000..712118dbc --- /dev/null +++ b/tex/generic/context/luatex/luatex-languages.lua @@ -0,0 +1,45 @@ +if not modules then modules = { } end modules ['luatex-languages'] = { + version = 1.001, + comment = "companion to luatex-languages.tex", + author = "Hans Hagen, PRAGMA-ADE, Hasselt NL", + copyright = "PRAGMA ADE / ConTeXt Development Team", + license = "see context related readme files" +} + +-- We borrow fron ConTeXt. + +languages = languages or { } + +local loaded = { } + +function languages.loadpatterns(tag) + if not loaded[tag] then + loaded[tag] = 0 + local filename = kpse.find_file("lang-" .. tag .. ".lua") + if filename and filename == "" then + print("<unknown language file for: " .. tag .. ">") + else + local whatever = loadfile(filename) + if type(whatever) == "function" then + whatever = whatever() + if type(whatever) == "table" then + local characters = whatever.patterns.characters or "" + local patterns = whatever.patterns.data or "" + local exceptions = whatever.exceptions.data or "" + local language = lang.new() + for b in string.utfvalues(characters) do + tex.setlccode(b,b) + end + lang.patterns(language, patterns) + lang.hyphenation(language, exceptions) + loaded[tag] = lang.id(language) + else + print("<invalid language table: " .. tag .. ">") + end + else + print("<invalid language file: " .. tag .. ">") + end + end + end + return loaded[tag] +end |