diff options
author | Mojca Miklavec <mojca.miklavec@gmail.com> | 2013-05-07 23:38:30 +0000 |
---|---|---|
committer | Mojca Miklavec <mojca.miklavec@gmail.com> | 2013-05-07 23:38:30 +0000 |
commit | 1a8e9572db5e1902de28cf84b45f8ed8b45de5c0 (patch) | |
tree | cb220baa38f0f8b44f52e0f5340ed4c4c011ca13 /Master/texmf-dist/source/generic/hyph-utf8/generate-ptex-patterns.rb | |
parent | a51a5c6021b880f32efe163726f67cc673551c68 (diff) |
hyph-utf8 (2012.05.08)
- add Georgian hyphenation patterns (by Levan Shoshiashvili)
- add Thai hyphenation patterns (by Theppitak Karoonboonyanan) [not yet added as a package]
- cleanup luatex-hyphen module
- fix adding a dialect of a synonym in LuaTeX
git-svn-id: svn://tug.org/texlive/trunk@30326 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/generic/hyph-utf8/generate-ptex-patterns.rb')
-rwxr-xr-x | Master/texmf-dist/source/generic/hyph-utf8/generate-ptex-patterns.rb | 34 |
1 files changed, 14 insertions, 20 deletions
diff --git a/Master/texmf-dist/source/generic/hyph-utf8/generate-ptex-patterns.rb b/Master/texmf-dist/source/generic/hyph-utf8/generate-ptex-patterns.rb index 48befd6f011..b4f2a3c82da 100755 --- a/Master/texmf-dist/source/generic/hyph-utf8/generate-ptex-patterns.rb +++ b/Master/texmf-dist/source/generic/hyph-utf8/generate-ptex-patterns.rb @@ -15,7 +15,7 @@ $path_root=File.expand_path("../../..") $path_ptex="#{$path_root}/tex/generic/hyph-utf8/patterns/ptex" # load encodings -encodings_list = ["ascii", "ec", "qx", "t2a", "lmc", "il2", "il3", "l7x"] +encodings_list = ["ascii", "ec", "qx", "t2a", "lmc", "il2", "il3", "l7x", "t8m", "lth"] encodings = Hash.new encodings_list.each do |encoding_name| encodings[encoding_name] = Encoding.new(encoding_name) @@ -30,14 +30,6 @@ language_codes = Hash.new languages.each do |language| language_codes[language.code] = language.code end -# language_codes['mn-cyrl-x-lmc'] = nil -# language_codes['sh-latn'] = 'sr-latn' -# language_codes['sh-cyrl'] = nil - -# e = Encoding.new("ec") -# puts e.convert_string_to_escaped_characters("moja čaša") -# -# return languages.sort{|x,y| x.code <=> y.code }.each do |language| encoding = nil @@ -70,6 +62,8 @@ languages.sort{|x,y| x.code <=> y.code }.each do |language| patterns = $l['no'].get_patterns end + characters = patterns.join('').gsub(/[.0-9]/,'').unpack('U*').sort.uniq + if language.encoding != 'ascii' then patterns = encoding.convert_to_escaped_characters(patterns) exceptions = encoding.convert_to_escaped_characters(exceptions) @@ -85,24 +79,24 @@ languages.sort{|x,y| x.code <=> y.code }.each do |language| file_ptex.puts("% See the original file for details about author, licence etc.") file_ptex.puts("%") + file_ptex.puts("\\bgroup") + # setting lccodes for letters + characters.each do |c| + if c >= 128 then + code = encoding.unicode_characters[c].code_enc + file_ptex.puts sprintf("\\lccode\"%02X=\"%02X", code, code) + end + end + # patterns if patterns.length > 0 then - # file_ptex.puts("\\patterns{\n#{encoding.convert_to_escaped_characters(patterns.join("\n"))}\n}") file_ptex.puts("\\patterns{\n#{patterns.join("\n")}\n}") end + # exceptions if exceptions.length > 0 then - # file_ptex.puts("\\hyphenation{\n#{encoding.convert_to_escaped_characters(exceptions.join("\n"))}\n}") file_ptex.puts("\\hyphenation{\n#{exceptions.join("\n")}\n}") end + file_ptex.puts("\\egroup") - - # # patterns - # patterns.each do |pattern| - # $file_pat.puts pattern.gsub(/'/,"’") - # end - # # exceptions - # if exceptions != "" - # $file_hyp.puts exceptions - # end file_ptex.close end end |