kotex-utils (27oct15)

git-svn-id: svn://tug.org/texlive/trunk@38727 c570f23f-e606-0410-a88d-b1316a301751

2 files changed, 286 insertions, 286 deletions

diff --git a/Master/texmf-dist/scripts/kotex-utils/jamo-normalize.pl b/Master/texmf-dist/scripts/kotex-utils/jamo-normalize.pl
index a22c5c01401..3c7bcb08b5b 100755
--- a/Master/texmf-dist/scripts/kotex-utils/jamo-normalize.pl
+++ b/Master/texmf-dist/scripts/kotex-utils/jamo-normalize.pl
@@ -1,8 +1,8 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 # jamo-normalize.pl
 #
-# Copyright (c) 2003-2013 Dohyun Kim <nomos at ktug org>
+# Copyright (c) 2003-2015 Dohyun Kim <nomos at ktug org>
 #
 # This work may be distributed and/or modified under the
 # conditions of the LaTeX Project Public License, either version 1.3c
@@ -32,8 +32,9 @@ while (@ARGV) {
   elsif ($opt =~ /-i/i) { $OPT{normalhanja} = 1 }
   elsif ($opt =~ /-c/i) { $OPT{compatjamo}  = 1 }
   else  {
+    (my $prog = $0) =~ s/.*[\/\\]//;
     print
-    "Usage: $0 [options] < in_file > out_file\n\n",
+    "Usage: $prog [options] < in_file > out_file\n\n",
     "  Translate Hangul Jamo sequence to Hangul syllables\n\n",
     "  -b :  insert ZWS between syllable blocks (not for practical use)\n",
     "  -c :  convert conjoining Jamo to compatibility Jamo\n",
@@ -256,274 +257,276 @@ sub do_jamo2jamocomp {
 }
 
 sub normalize_hanja {
-  s/\x{F900}/\x{8C48}/g;
-  s/\x{F901}/\x{66F4}/g;
-  s/\x{F902}/\x{8ECA}/g;
-  s/\x{F903}/\x{8CC8}/g;
-  s/\x{F904}/\x{6ED1}/g;
-  s/\x{F905}/\x{4E32}/g;
-  s/\x{F906}/\x{53E5}/g;
-  s/\x{F907}/\x{9F9C}/g;
-  s/\x{F908}/\x{9F9C}/g;
-  s/\x{F909}/\x{5951}/g;
-  s/\x{F90A}/\x{91D1}/g;
-  s/\x{F90B}/\x{5587}/g;
-  s/\x{F90C}/\x{5948}/g;
-  s/\x{F90D}/\x{61F6}/g;
-  s/\x{F90E}/\x{7669}/g;
-  s/\x{F90F}/\x{7F85}/g;
-  s/\x{F910}/\x{863F}/g;
-  s/\x{F911}/\x{87BA}/g;
-  s/\x{F912}/\x{88F8}/g;
-  s/\x{F913}/\x{908F}/g;
-  s/\x{F914}/\x{6A02}/g;
-  s/\x{F915}/\x{6D1B}/g;
-  s/\x{F916}/\x{70D9}/g;
-  s/\x{F917}/\x{73DE}/g;
-  s/\x{F918}/\x{843D}/g;
-  s/\x{F919}/\x{916A}/g;
-  s/\x{F91A}/\x{99F1}/g;
-  s/\x{F91B}/\x{4E82}/g;
-  s/\x{F91C}/\x{5375}/g;
-  s/\x{F91D}/\x{6B04}/g;
-  s/\x{F91E}/\x{721B}/g;
-  s/\x{F91F}/\x{862D}/g;
-  s/\x{F920}/\x{9E1E}/g;
-  s/\x{F921}/\x{5D50}/g;
-  s/\x{F922}/\x{6FEB}/g;
-  s/\x{F923}/\x{85CD}/g;
-  s/\x{F924}/\x{8964}/g;
-  s/\x{F925}/\x{62C9}/g;
-  s/\x{F926}/\x{81D8}/g;
-  s/\x{F927}/\x{881F}/g;
-  s/\x{F928}/\x{5ECA}/g;
-  s/\x{F929}/\x{6717}/g;
-  s/\x{F92A}/\x{6D6A}/g;
-  s/\x{F92B}/\x{72FC}/g;
-  s/\x{F92C}/\x{90DE}/g;
-  s/\x{F92D}/\x{4F86}/g;
-  s/\x{F92E}/\x{51B7}/g;
-  s/\x{F92F}/\x{52DE}/g;
-  s/\x{F930}/\x{64C4}/g;
-  s/\x{F931}/\x{6AD3}/g;
-  s/\x{F932}/\x{7210}/g;
-  s/\x{F933}/\x{76E7}/g;
-  s/\x{F934}/\x{8001}/g;
-  s/\x{F935}/\x{8606}/g;
-  s/\x{F936}/\x{865C}/g;
-  s/\x{F937}/\x{8DEF}/g;
-  s/\x{F938}/\x{9732}/g;
-  s/\x{F939}/\x{9B6F}/g;
-  s/\x{F93A}/\x{9DFA}/g;
-  s/\x{F93B}/\x{788C}/g;
-  s/\x{F93C}/\x{797F}/g;
-  s/\x{F93D}/\x{7DA0}/g;
-  s/\x{F93E}/\x{83C9}/g;
-  s/\x{F93F}/\x{9304}/g;
-  s/\x{F940}/\x{9E7F}/g;
-  s/\x{F941}/\x{8AD6}/g;
-  s/\x{F942}/\x{58DF}/g;
-  s/\x{F943}/\x{5F04}/g;
-  s/\x{F944}/\x{7C60}/g;
-  s/\x{F945}/\x{807E}/g;
-  s/\x{F946}/\x{7262}/g;
-  s/\x{F947}/\x{78CA}/g;
-  s/\x{F948}/\x{8CC2}/g;
-  s/\x{F949}/\x{96F7}/g;
-  s/\x{F94A}/\x{58D8}/g;
-  s/\x{F94B}/\x{5C62}/g;
-  s/\x{F94C}/\x{6A13}/g;
-  s/\x{F94D}/\x{6DDA}/g;
-  s/\x{F94E}/\x{6F0F}/g;
-  s/\x{F94F}/\x{7D2F}/g;
-  s/\x{F950}/\x{7E37}/g;
-  s/\x{F951}/\x{964B}/g;
-  s/\x{F952}/\x{52D2}/g;
-  s/\x{F953}/\x{808B}/g;
-  s/\x{F954}/\x{51DC}/g;
-  s/\x{F955}/\x{51CC}/g;
-  s/\x{F956}/\x{7A1C}/g;
-  s/\x{F957}/\x{7DBE}/g;
-  s/\x{F958}/\x{83F1}/g;
-  s/\x{F959}/\x{9675}/g;
-  s/\x{F95A}/\x{8B80}/g;
-  s/\x{F95B}/\x{62CF}/g;
-  s/\x{F95C}/\x{6A02}/g;
-  s/\x{F95D}/\x{8AFE}/g;
-  s/\x{F95E}/\x{4E39}/g;
-  s/\x{F95F}/\x{5BE7}/g;
-  s/\x{F960}/\x{6012}/g;
-  s/\x{F961}/\x{7387}/g;
-  s/\x{F962}/\x{7570}/g;
-  s/\x{F963}/\x{5317}/g;
-  s/\x{F964}/\x{78FB}/g;
-  s/\x{F965}/\x{4FBF}/g;
-  s/\x{F966}/\x{5FA9}/g;
-  s/\x{F967}/\x{4E0D}/g;
-  s/\x{F968}/\x{6CCC}/g;
-  s/\x{F969}/\x{6578}/g;
-  s/\x{F96A}/\x{7D22}/g;
-  s/\x{F96B}/\x{53C3}/g;
-  s/\x{F96C}/\x{585E}/g;
-  s/\x{F96D}/\x{7701}/g;
-  s/\x{F96E}/\x{8449}/g;
-  s/\x{F96F}/\x{8AAA}/g;
-  s/\x{F970}/\x{6BBA}/g;
-  s/\x{F971}/\x{8FB0}/g;
-  s/\x{F972}/\x{6C88}/g;
-  s/\x{F973}/\x{62FE}/g;
-  s/\x{F974}/\x{82E5}/g;
-  s/\x{F975}/\x{63A0}/g;
-  s/\x{F976}/\x{7565}/g;
-  s/\x{F977}/\x{4EAE}/g;
-  s/\x{F978}/\x{5169}/g;
-  s/\x{F979}/\x{51C9}/g;
-  s/\x{F97A}/\x{6881}/g;
-  s/\x{F97B}/\x{7CE7}/g;
-  s/\x{F97C}/\x{826F}/g;
-  s/\x{F97D}/\x{8AD2}/g;
-  s/\x{F97E}/\x{91CF}/g;
-  s/\x{F97F}/\x{52F5}/g;
-  s/\x{F980}/\x{5442}/g;
-  s/\x{F981}/\x{5973}/g;
-  s/\x{F982}/\x{5EEC}/g;
-  s/\x{F983}/\x{65C5}/g;
-  s/\x{F984}/\x{6FFE}/g;
-  s/\x{F985}/\x{792A}/g;
-  s/\x{F986}/\x{95AD}/g;
-  s/\x{F987}/\x{9A6A}/g;
-  s/\x{F988}/\x{9E97}/g;
-  s/\x{F989}/\x{9ECE}/g;
-  s/\x{F98A}/\x{529B}/g;
-  s/\x{F98B}/\x{66C6}/g;
-  s/\x{F98C}/\x{6B77}/g;
-  s/\x{F98D}/\x{8F62}/g;
-  s/\x{F98E}/\x{5E74}/g;
-  s/\x{F98F}/\x{6190}/g;
-  s/\x{F990}/\x{6200}/g;
-  s/\x{F991}/\x{649A}/g;
-  s/\x{F992}/\x{6F23}/g;
-  s/\x{F993}/\x{7149}/g;
-  s/\x{F994}/\x{7489}/g;
-  s/\x{F995}/\x{79CA}/g;
-  s/\x{F996}/\x{7DF4}/g;
-  s/\x{F997}/\x{806F}/g;
-  s/\x{F998}/\x{8F26}/g;
-  s/\x{F999}/\x{84EE}/g;
-  s/\x{F99A}/\x{9023}/g;
-  s/\x{F99B}/\x{934A}/g;
-  s/\x{F99C}/\x{5217}/g;
-  s/\x{F99D}/\x{52A3}/g;
-  s/\x{F99E}/\x{54BD}/g;
-  s/\x{F99F}/\x{70C8}/g;
-  s/\x{F9A0}/\x{88C2}/g;
-  s/\x{F9A1}/\x{8AAA}/g;
-  s/\x{F9A2}/\x{5EC9}/g;
-  s/\x{F9A3}/\x{5FF5}/g;
-  s/\x{F9A4}/\x{637B}/g;
-  s/\x{F9A5}/\x{6BAE}/g;
-  s/\x{F9A6}/\x{7C3E}/g;
-  s/\x{F9A7}/\x{7375}/g;
-  s/\x{F9A8}/\x{4EE4}/g;
-  s/\x{F9A9}/\x{56F9}/g;
-  s/\x{F9AA}/\x{5BE7}/g;
-  s/\x{F9AB}/\x{5DBA}/g;
-  s/\x{F9AC}/\x{601C}/g;
-  s/\x{F9AD}/\x{73B2}/g;
-  s/\x{F9AE}/\x{7469}/g;
-  s/\x{F9AF}/\x{7F9A}/g;
-  s/\x{F9B0}/\x{8046}/g;
-  s/\x{F9B1}/\x{9234}/g;
-  s/\x{F9B2}/\x{96F6}/g;
-  s/\x{F9B3}/\x{9748}/g;
-  s/\x{F9B4}/\x{9818}/g;
-  s/\x{F9B5}/\x{4F8B}/g;
-  s/\x{F9B6}/\x{79AE}/g;
-  s/\x{F9B7}/\x{91B4}/g;
-  s/\x{F9B8}/\x{96B7}/g;
-  s/\x{F9B9}/\x{60E1}/g;
-  s/\x{F9BA}/\x{4E86}/g;
-  s/\x{F9BB}/\x{50DA}/g;
-  s/\x{F9BC}/\x{5BEE}/g;
-  s/\x{F9BD}/\x{5C3F}/g;
-  s/\x{F9BE}/\x{6599}/g;
-  s/\x{F9BF}/\x{6A02}/g;
-  s/\x{F9C0}/\x{71CE}/g;
-  s/\x{F9C1}/\x{7642}/g;
-  s/\x{F9C2}/\x{84FC}/g;
-  s/\x{F9C3}/\x{907C}/g;
-  s/\x{F9C4}/\x{9F8D}/g;
-  s/\x{F9C5}/\x{6688}/g;
-  s/\x{F9C6}/\x{962E}/g;
-  s/\x{F9C7}/\x{5289}/g;
-  s/\x{F9C8}/\x{677B}/g;
-  s/\x{F9C9}/\x{67F3}/g;
-  s/\x{F9CA}/\x{6D41}/g;
-  s/\x{F9CB}/\x{6E9C}/g;
-  s/\x{F9CC}/\x{7409}/g;
-  s/\x{F9CD}/\x{7559}/g;
-  s/\x{F9CE}/\x{786B}/g;
-  s/\x{F9CF}/\x{7D10}/g;
-  s/\x{F9D0}/\x{985E}/g;
-  s/\x{F9D1}/\x{516D}/g;
-  s/\x{F9D2}/\x{622E}/g;
-  s/\x{F9D3}/\x{9678}/g;
-  s/\x{F9D4}/\x{502B}/g;
-  s/\x{F9D5}/\x{5D19}/g;
-  s/\x{F9D6}/\x{6DEA}/g;
-  s/\x{F9D7}/\x{8F2A}/g;
-  s/\x{F9D8}/\x{5F8B}/g;
-  s/\x{F9D9}/\x{6144}/g;
-  s/\x{F9DA}/\x{6817}/g;
-  s/\x{F9DB}/\x{7387}/g;
-  s/\x{F9DC}/\x{9686}/g;
-  s/\x{F9DD}/\x{5229}/g;
-  s/\x{F9DE}/\x{540F}/g;
-  s/\x{F9DF}/\x{5C65}/g;
-  s/\x{F9E0}/\x{6613}/g;
-  s/\x{F9E1}/\x{674E}/g;
-  s/\x{F9E2}/\x{68A8}/g;
-  s/\x{F9E3}/\x{6CE5}/g;
-  s/\x{F9E4}/\x{7406}/g;
-  s/\x{F9E5}/\x{75E2}/g;
-  s/\x{F9E6}/\x{7F79}/g;
-  s/\x{F9E7}/\x{88CF}/g;
-  s/\x{F9E8}/\x{88E1}/g;
-  s/\x{F9E9}/\x{91CC}/g;
-  s/\x{F9EA}/\x{96E2}/g;
-  s/\x{F9EB}/\x{533F}/g;
-  s/\x{F9EC}/\x{6EBA}/g;
-  s/\x{F9ED}/\x{541D}/g;
-  s/\x{F9EE}/\x{71D0}/g;
-  s/\x{F9EF}/\x{7498}/g;
-  s/\x{F9F0}/\x{85FA}/g;
-  s/\x{F9F1}/\x{96A3}/g;
-  s/\x{F9F2}/\x{9C57}/g;
-  s/\x{F9F3}/\x{9E9F}/g;
-  s/\x{F9F4}/\x{6797}/g;
-  s/\x{F9F5}/\x{6DCB}/g;
-  s/\x{F9F6}/\x{81E8}/g;
-  s/\x{F9F7}/\x{7ACB}/g;
-  s/\x{F9F8}/\x{7B20}/g;
-  s/\x{F9F9}/\x{7C92}/g;
-  s/\x{F9FA}/\x{72C0}/g;
-  s/\x{F9FB}/\x{7099}/g;
-  s/\x{F9FC}/\x{8B58}/g;
-  s/\x{F9FD}/\x{4EC0}/g;
-  s/\x{F9FE}/\x{8336}/g;
-  s/\x{F9FF}/\x{523A}/g;
-  s/\x{FA00}/\x{5207}/g;
-  s/\x{FA01}/\x{5EA6}/g;
-  s/\x{FA02}/\x{62D3}/g;
-  s/\x{FA03}/\x{7CD6}/g;
-  s/\x{FA04}/\x{5B85}/g;
-  s/\x{FA05}/\x{6D1E}/g;
-  s/\x{FA06}/\x{66B4}/g;
-  s/\x{FA07}/\x{8F3B}/g;
-  s/\x{FA08}/\x{884C}/g;
-  s/\x{FA09}/\x{964D}/g;
-  s/\x{FA0A}/\x{898B}/g;
-  s/\x{FA0B}/\x{5ED3}/g;
+  s/\x{F900}/\x{8C48}\x{FE00}/g;
+  s/\x{F901}/\x{66F4}\x{FE00}/g;
+  s/\x{F902}/\x{8ECA}\x{FE00}/g;
+  s/\x{F903}/\x{8CC8}\x{FE00}/g;
+  s/\x{F904}/\x{6ED1}\x{FE00}/g;
+  s/\x{F905}/\x{4E32}\x{FE00}/g;
+  s/\x{F906}/\x{53E5}\x{FE00}/g;
+  s/\x{F907}/\x{9F9C}\x{FE00}/g;
+  s/\x{F908}/\x{9F9C}\x{FE01}/g;
+  s/\x{F909}/\x{5951}\x{FE00}/g;
+  s/\x{F90A}/\x{91D1}\x{FE00}/g;
+  s/\x{F90B}/\x{5587}\x{FE00}/g;
+  s/\x{F90C}/\x{5948}\x{FE00}/g;
+  s/\x{F90D}/\x{61F6}\x{FE00}/g;
+  s/\x{F90E}/\x{7669}\x{FE00}/g;
+  s/\x{F90F}/\x{7F85}\x{FE00}/g;
+  s/\x{F910}/\x{863F}\x{FE00}/g;
+  s/\x{F911}/\x{87BA}\x{FE00}/g;
+  s/\x{F912}/\x{88F8}\x{FE00}/g;
+  s/\x{F913}/\x{908F}\x{FE00}/g;
+  s/\x{F914}/\x{6A02}\x{FE00}/g;
+  s/\x{F915}/\x{6D1B}\x{FE00}/g;
+  s/\x{F916}/\x{70D9}\x{FE00}/g;
+  s/\x{F917}/\x{73DE}\x{FE00}/g;
+  s/\x{F918}/\x{843D}\x{FE00}/g;
+  s/\x{F919}/\x{916A}\x{FE00}/g;
+  s/\x{F91A}/\x{99F1}\x{FE00}/g;
+  s/\x{F91B}/\x{4E82}\x{FE00}/g;
+  s/\x{F91C}/\x{5375}\x{FE00}/g;
+  s/\x{F91D}/\x{6B04}\x{FE00}/g;
+  s/\x{F91E}/\x{721B}\x{FE00}/g;
+  s/\x{F91F}/\x{862D}\x{FE00}/g;
+  s/\x{F920}/\x{9E1E}\x{FE00}/g;
+  s/\x{F921}/\x{5D50}\x{FE00}/g;
+  s/\x{F922}/\x{6FEB}\x{FE00}/g;
+  s/\x{F923}/\x{85CD}\x{FE00}/g;
+  s/\x{F924}/\x{8964}\x{FE00}/g;
+  s/\x{F925}/\x{62C9}\x{FE00}/g;
+  s/\x{F926}/\x{81D8}\x{FE00}/g;
+  s/\x{F927}/\x{881F}\x{FE00}/g;
+  s/\x{F928}/\x{5ECA}\x{FE00}/g;
+  s/\x{F929}/\x{6717}\x{FE00}/g;
+  s/\x{F92A}/\x{6D6A}\x{FE00}/g;
+  s/\x{F92B}/\x{72FC}\x{FE00}/g;
+  s/\x{F92C}/\x{90CE}\x{FE00}/g;
+  s/\x{F92D}/\x{4F86}\x{FE00}/g;
+  s/\x{F92E}/\x{51B7}\x{FE00}/g;
+  s/\x{F92F}/\x{52DE}\x{FE00}/g;
+  s/\x{F930}/\x{64C4}\x{FE00}/g;
+  s/\x{F931}/\x{6AD3}\x{FE00}/g;
+  s/\x{F932}/\x{7210}\x{FE00}/g;
+  s/\x{F933}/\x{76E7}\x{FE00}/g;
+  s/\x{F934}/\x{8001}\x{FE00}/g;
+  s/\x{F935}/\x{8606}\x{FE00}/g;
+  s/\x{F936}/\x{865C}\x{FE00}/g;
+  s/\x{F937}/\x{8DEF}\x{FE00}/g;
+  s/\x{F938}/\x{9732}\x{FE00}/g;
+  s/\x{F939}/\x{9B6F}\x{FE00}/g;
+  s/\x{F93A}/\x{9DFA}\x{FE00}/g;
+  s/\x{F93B}/\x{788C}\x{FE00}/g;
+  s/\x{F93C}/\x{797F}\x{FE00}/g;
+  s/\x{F93D}/\x{7DA0}\x{FE00}/g;
+  s/\x{F93E}/\x{83C9}\x{FE00}/g;
+  s/\x{F93F}/\x{9304}\x{FE00}/g;
+  s/\x{F940}/\x{9E7F}\x{FE00}/g;
+  s/\x{F941}/\x{8AD6}\x{FE00}/g;
+  s/\x{F942}/\x{58DF}\x{FE00}/g;
+  s/\x{F943}/\x{5F04}\x{FE00}/g;
+  s/\x{F944}/\x{7C60}\x{FE00}/g;
+  s/\x{F945}/\x{807E}\x{FE00}/g;
+  s/\x{F946}/\x{7262}\x{FE00}/g;
+  s/\x{F947}/\x{78CA}\x{FE00}/g;
+  s/\x{F948}/\x{8CC2}\x{FE00}/g;
+  s/\x{F949}/\x{96F7}\x{FE00}/g;
+  s/\x{F94A}/\x{58D8}\x{FE00}/g;
+  s/\x{F94B}/\x{5C62}\x{FE00}/g;
+  s/\x{F94C}/\x{6A13}\x{FE00}/g;
+  s/\x{F94D}/\x{6DDA}\x{FE00}/g;
+  s/\x{F94E}/\x{6F0F}\x{FE00}/g;
+  s/\x{F94F}/\x{7D2F}\x{FE00}/g;
+  s/\x{F950}/\x{7E37}\x{FE00}/g;
+  s/\x{F951}/\x{964B}\x{FE00}/g;
+  s/\x{F952}/\x{52D2}\x{FE00}/g;
+  s/\x{F953}/\x{808B}\x{FE00}/g;
+  s/\x{F954}/\x{51DC}\x{FE00}/g;
+  s/\x{F955}/\x{51CC}\x{FE00}/g;
+  s/\x{F956}/\x{7A1C}\x{FE00}/g;
+  s/\x{F957}/\x{7DBE}\x{FE00}/g;
+  s/\x{F958}/\x{83F1}\x{FE00}/g;
+  s/\x{F959}/\x{9675}\x{FE00}/g;
+  s/\x{F95A}/\x{8B80}\x{FE00}/g;
+  s/\x{F95B}/\x{62CF}\x{FE00}/g;
+  s/\x{F95C}/\x{6A02}\x{FE01}/g;
+  s/\x{F95D}/\x{8AFE}\x{FE00}/g;
+  s/\x{F95E}/\x{4E39}\x{FE00}/g;
+  s/\x{F95F}/\x{5BE7}\x{FE00}/g;
+  s/\x{F960}/\x{6012}\x{FE00}/g;
+  s/\x{F961}/\x{7387}\x{FE00}/g;
+  s/\x{F962}/\x{7570}\x{FE00}/g;
+  s/\x{F963}/\x{5317}\x{FE00}/g;
+  s/\x{F964}/\x{78FB}\x{FE00}/g;
+  s/\x{F965}/\x{4FBF}\x{FE00}/g;
+  s/\x{F966}/\x{5FA9}\x{FE00}/g;
+  s/\x{F967}/\x{4E0D}\x{FE00}/g;
+  s/\x{F968}/\x{6CCC}\x{FE00}/g;
+  s/\x{F969}/\x{6578}\x{FE00}/g;
+  s/\x{F96A}/\x{7D22}\x{FE00}/g;
+  s/\x{F96B}/\x{53C3}\x{FE00}/g;
+  s/\x{F96C}/\x{585E}\x{FE00}/g;
+  s/\x{F96D}/\x{7701}\x{FE00}/g;
+  s/\x{F96E}/\x{8449}\x{FE00}/g;
+  s/\x{F96F}/\x{8AAA}\x{FE00}/g;
+  s/\x{F970}/\x{6BBA}\x{FE00}/g;
+  s/\x{F971}/\x{8FB0}\x{FE00}/g;
+  s/\x{F972}/\x{6C88}\x{FE00}/g;
+  s/\x{F973}/\x{62FE}\x{FE00}/g;
+  s/\x{F974}/\x{82E5}\x{FE00}/g;
+  s/\x{F975}/\x{63A0}\x{FE00}/g;
+  s/\x{F976}/\x{7565}\x{FE00}/g;
+  s/\x{F977}/\x{4EAE}\x{FE00}/g;
+  s/\x{F978}/\x{5169}\x{FE00}/g;
+  s/\x{F979}/\x{51C9}\x{FE00}/g;
+  s/\x{F97A}/\x{6881}\x{FE00}/g;
+  s/\x{F97B}/\x{7CE7}\x{FE00}/g;
+  s/\x{F97C}/\x{826F}\x{FE00}/g;
+  s/\x{F97D}/\x{8AD2}\x{FE00}/g;
+  s/\x{F97E}/\x{91CF}\x{FE00}/g;
+  s/\x{F97F}/\x{52F5}\x{FE00}/g;
+  s/\x{F980}/\x{5442}\x{FE00}/g;
+  s/\x{F981}/\x{5973}\x{FE00}/g;
+  s/\x{F982}/\x{5EEC}\x{FE00}/g;
+  s/\x{F983}/\x{65C5}\x{FE00}/g;
+  s/\x{F984}/\x{6FFE}\x{FE00}/g;
+  s/\x{F985}/\x{792A}\x{FE00}/g;
+  s/\x{F986}/\x{95AD}\x{FE00}/g;
+  s/\x{F987}/\x{9A6A}\x{FE00}/g;
+  s/\x{F988}/\x{9E97}\x{FE00}/g;
+  s/\x{F989}/\x{9ECE}\x{FE00}/g;
+  s/\x{F98A}/\x{529B}\x{FE00}/g;
+  s/\x{F98B}/\x{66C6}\x{FE00}/g;
+  s/\x{F98C}/\x{6B77}\x{FE00}/g;
+  s/\x{F98D}/\x{8F62}\x{FE00}/g;
+  s/\x{F98E}/\x{5E74}\x{FE00}/g;
+  s/\x{F98F}/\x{6190}\x{FE00}/g;
+  s/\x{F990}/\x{6200}\x{FE00}/g;
+  s/\x{F991}/\x{649A}\x{FE00}/g;
+  s/\x{F992}/\x{6F23}\x{FE00}/g;
+  s/\x{F993}/\x{7149}\x{FE00}/g;
+  s/\x{F994}/\x{7489}\x{FE00}/g;
+  s/\x{F995}/\x{79CA}\x{FE00}/g;
+  s/\x{F996}/\x{7DF4}\x{FE00}/g;
+  s/\x{F997}/\x{806F}\x{FE00}/g;
+  s/\x{F998}/\x{8F26}\x{FE00}/g;
+  s/\x{F999}/\x{84EE}\x{FE00}/g;
+  s/\x{F99A}/\x{9023}\x{FE00}/g;
+  s/\x{F99B}/\x{934A}\x{FE00}/g;
+  s/\x{F99C}/\x{5217}\x{FE00}/g;
+  s/\x{F99D}/\x{52A3}\x{FE00}/g;
+  s/\x{F99E}/\x{54BD}\x{FE00}/g;
+  s/\x{F99F}/\x{70C8}\x{FE00}/g;
+  s/\x{F9A0}/\x{88C2}\x{FE00}/g;
+  s/\x{F9A1}/\x{8AAA}\x{FE01}/g;
+  s/\x{F9A2}/\x{5EC9}\x{FE00}/g;
+  s/\x{F9A3}/\x{5FF5}\x{FE00}/g;
+  s/\x{F9A4}/\x{637B}\x{FE00}/g;
+  s/\x{F9A5}/\x{6BAE}\x{FE00}/g;
+  s/\x{F9A6}/\x{7C3E}\x{FE00}/g;
+  s/\x{F9A7}/\x{7375}\x{FE00}/g;
+  s/\x{F9A8}/\x{4EE4}\x{FE00}/g;
+  s/\x{F9A9}/\x{56F9}\x{FE00}/g;
+  s/\x{F9AA}/\x{5BE7}\x{FE01}/g;
+  s/\x{F9AB}/\x{5DBA}\x{FE00}/g;
+  s/\x{F9AC}/\x{601C}\x{FE00}/g;
+  s/\x{F9AD}/\x{73B2}\x{FE00}/g;
+  s/\x{F9AE}/\x{7469}\x{FE00}/g;
+  s/\x{F9AF}/\x{7F9A}\x{FE00}/g;
+  s/\x{F9B0}/\x{8046}\x{FE00}/g;
+  s/\x{F9B1}/\x{9234}\x{FE00}/g;
+  s/\x{F9B2}/\x{96F6}\x{FE00}/g;
+  s/\x{F9B3}/\x{9748}\x{FE00}/g;
+  s/\x{F9B4}/\x{9818}\x{FE00}/g;
+  s/\x{F9B5}/\x{4F8B}\x{FE00}/g;
+  s/\x{F9B6}/\x{79AE}\x{FE00}/g;
+  s/\x{F9B7}/\x{91B4}\x{FE00}/g;
+  s/\x{F9B8}/\x{96B8}\x{FE00}/g;
+  s/\x{F9B9}/\x{60E1}\x{FE00}/g;
+  s/\x{F9BA}/\x{4E86}\x{FE00}/g;
+  s/\x{F9BB}/\x{50DA}\x{FE00}/g;
+  s/\x{F9BC}/\x{5BEE}\x{FE00}/g;
+  s/\x{F9BD}/\x{5C3F}\x{FE00}/g;
+  s/\x{F9BE}/\x{6599}\x{FE00}/g;
+  s/\x{F9BF}/\x{6A02}\x{FE02}/g;
+  s/\x{F9C0}/\x{71CE}\x{FE00}/g;
+  s/\x{F9C1}/\x{7642}\x{FE00}/g;
+  s/\x{F9C2}/\x{84FC}\x{FE00}/g;
+  s/\x{F9C3}/\x{907C}\x{FE00}/g;
+  s/\x{F9C4}/\x{9F8D}\x{FE00}/g;
+  s/\x{F9C5}/\x{6688}\x{FE00}/g;
+  s/\x{F9C6}/\x{962E}\x{FE00}/g;
+  s/\x{F9C7}/\x{5289}\x{FE00}/g;
+  s/\x{F9C8}/\x{677B}\x{FE00}/g;
+  s/\x{F9C9}/\x{67F3}\x{FE00}/g;
+  s/\x{F9CA}/\x{6D41}\x{FE00}/g;
+  s/\x{F9CB}/\x{6E9C}\x{FE00}/g;
+  s/\x{F9CC}/\x{7409}\x{FE00}/g;
+  s/\x{F9CD}/\x{7559}\x{FE00}/g;
+  s/\x{F9CE}/\x{786B}\x{FE00}/g;
+  s/\x{F9CF}/\x{7D10}\x{FE00}/g;
+  s/\x{F9D0}/\x{985E}\x{FE00}/g;
+  s/\x{F9D1}/\x{516D}\x{FE00}/g;
+  s/\x{F9D2}/\x{622E}\x{FE00}/g;
+  s/\x{F9D3}/\x{9678}\x{FE00}/g;
+  s/\x{F9D4}/\x{502B}\x{FE00}/g;
+  s/\x{F9D5}/\x{5D19}\x{FE00}/g;
+  s/\x{F9D6}/\x{6DEA}\x{FE00}/g;
+  s/\x{F9D7}/\x{8F2A}\x{FE00}/g;
+  s/\x{F9D8}/\x{5F8B}\x{FE00}/g;
+  s/\x{F9D9}/\x{6144}\x{FE00}/g;
+  s/\x{F9DA}/\x{6817}\x{FE00}/g;
+  s/\x{F9DB}/\x{7387}\x{FE01}/g;
+  s/\x{F9DC}/\x{9686}\x{FE00}/g;
+  s/\x{F9DD}/\x{5229}\x{FE00}/g;
+  s/\x{F9DE}/\x{540F}\x{FE00}/g;
+  s/\x{F9DF}/\x{5C65}\x{FE00}/g;
+  s/\x{F9E0}/\x{6613}\x{FE00}/g;
+  s/\x{F9E1}/\x{674E}\x{FE00}/g;
+  s/\x{F9E2}/\x{68A8}\x{FE00}/g;
+  s/\x{F9E3}/\x{6CE5}\x{FE00}/g;
+  s/\x{F9E4}/\x{7406}\x{FE00}/g;
+  s/\x{F9E5}/\x{75E2}\x{FE00}/g;
+  s/\x{F9E6}/\x{7F79}\x{FE00}/g;
+  s/\x{F9E7}/\x{88CF}\x{FE00}/g;
+  s/\x{F9E8}/\x{88E1}\x{FE00}/g;
+  s/\x{F9E9}/\x{91CC}\x{FE00}/g;
+  s/\x{F9EA}/\x{96E2}\x{FE00}/g;
+  s/\x{F9EB}/\x{533F}\x{FE00}/g;
+  s/\x{F9EC}/\x{6EBA}\x{FE00}/g;
+  s/\x{F9ED}/\x{541D}\x{FE00}/g;
+  s/\x{F9EE}/\x{71D0}\x{FE00}/g;
+  s/\x{F9EF}/\x{7498}\x{FE00}/g;
+  s/\x{F9F0}/\x{85FA}\x{FE00}/g;
+  s/\x{F9F1}/\x{96A3}\x{FE00}/g;
+  s/\x{F9F2}/\x{9C57}\x{FE00}/g;
+  s/\x{F9F3}/\x{9E9F}\x{FE00}/g;
+  s/\x{F9F4}/\x{6797}\x{FE00}/g;
+  s/\x{F9F5}/\x{6DCB}\x{FE00}/g;
+  s/\x{F9F6}/\x{81E8}\x{FE00}/g;
+  s/\x{F9F7}/\x{7ACB}\x{FE00}/g;
+  s/\x{F9F8}/\x{7B20}\x{FE00}/g;
+  s/\x{F9F9}/\x{7C92}\x{FE00}/g;
+  s/\x{F9FA}/\x{72C0}\x{FE00}/g;
+  s/\x{F9FB}/\x{7099}\x{FE00}/g;
+  s/\x{F9FC}/\x{8B58}\x{FE00}/g;
+  s/\x{F9FD}/\x{4EC0}\x{FE00}/g;
+  s/\x{F9FE}/\x{8336}\x{FE00}/g;
+  s/\x{F9FF}/\x{523A}\x{FE00}/g;
+  s/\x{FA00}/\x{5207}\x{FE00}/g;
+  s/\x{FA01}/\x{5EA6}\x{FE00}/g;
+  s/\x{FA02}/\x{62D3}\x{FE00}/g;
+  s/\x{FA03}/\x{7CD6}\x{FE00}/g;
+  s/\x{FA04}/\x{5B85}\x{FE00}/g;
+  s/\x{FA05}/\x{6D1E}\x{FE00}/g;
+  s/\x{FA06}/\x{66B4}\x{FE00}/g;
+  s/\x{FA07}/\x{8F3B}\x{FE00}/g;
+  s/\x{FA08}/\x{884C}\x{FE00}/g;
+  s/\x{FA09}/\x{964D}\x{FE00}/g;
+  s/\x{FA0A}/\x{898B}\x{FE00}/g;
+  s/\x{FA0B}/\x{5ED3}\x{FE00}/g;
+  s/\x{FA2E}/\x{90DE}\x{FE00}/g;
+  s/\x{FA2F}/\x{96B7}\x{FE00}/g;
 }
 
 sub compose_jamo {
diff --git a/Master/texmf-dist/scripts/kotex-utils/komkindex.pl b/Master/texmf-dist/scripts/kotex-utils/komkindex.pl
index 93d7ac4893d..b144fb83d51 100755
--- a/Master/texmf-dist/scripts/kotex-utils/komkindex.pl
+++ b/Master/texmf-dist/scripts/kotex-utils/komkindex.pl
@@ -3,7 +3,7 @@
 
 # komkindex.pl
 #
-# Copyright (c) 2007-2013 Dohyun Kim <nomos at ktug org>
+# Copyright (c) 2007-2015 Dohyun Kim <nomos at ktug org>
 #
 # This work may be distributed and/or modified under the
 # conditions of the LaTeX Project Public License, either version 1.3c
@@ -159,16 +159,14 @@ if ($args{s}) {
 }
 
 $idx0 = $IDXfiles[0];
-$idx0 =~s/\.idx$//;
+$idx0 =~ s/\.[A-Za-z]+$//;
 
-$indfile = $args{o} || $idx0;
-$indfile =~ /(\..+?)$/ or $indfile .= ".ind";
+$indfile = $args{o} ? $args{o} : $idx0 . ".ind";
 
-$logfile = $args{t} || $idx0;
-$logfile =~ /(\..+?)$/ or $logfile .= ".ilg";
+$logfile = $args{t} ? $args{t} : $idx0 . ".ilg";
 
 foreach my $file (@IDXfiles) {
-  $file =~ /(\..+?)$/ or $file .= ".idx";
+  $file =~ /\.[A-Za-z]+$/ or $file .= ".idx";
 }
 
 ###
@@ -252,35 +250,34 @@ foreach my $file (@IDXfiles) {
     #    \indexentry{ ..... }{ .. }
     # -> $pre         $body $post
     if (/(\Q$ist_keyword\E\s*\Q$ist_arg_open\E)
-         (.*?[^\Q$ist_quote\E])
+         (.*)
          (\Q$ist_arg_close$ist_arg_open\E.+?\Q$ist_arg_close\E)
          $/x) {
       my($pre,$body,$post) = ($1,$2,$3);
 
       #    \indexentry{ ..... | .. }{ .. }
       # -> $pre         $body $post
-      my @xbody = split /(?<!\Q$ist_quote\E)\Q$ist_encap/,$body;
+      my @xbody = split /(?<!(?<!\\)[\\\Q$ist_quote\E])\Q$ist_encap/,$body;
       for ( my $i=$#xbody; $i>0; $i--) {
         $post = $ist_encap.$xbody[$i].$post;
       }
       $body = $xbody[0];
 
       # !을 경계로 가름.
-      @xbody = split /(?<!\Q$ist_quote\E)\Q$ist_level/, $body;
+      @xbody = split /(?<!(?<!\\)[\\\Q$ist_quote\E])\Q$ist_level/, $body;
 
       for (@xbody) {
         # @이 없으면... 넣어준다.
-        unless (/[^\Q$ist_quote\E]\Q$ist_actual/) {
+        unless (/(?<!(?<!\\)[\\\Q$ist_quote\E])\Q$ist_actual/) {
           $_ = $_.$ist_actual.$_;
         }
 
         # @을 경계로 가름.
-        my @ybody = split /(?<!\Q$ist_quote\E)\Q$ist_actual\E/, $_;
+        my @ybody = split /(?<!(?<!\\)[\\\Q$ist_quote\E])\Q$ist_actual\E/, $_;
         $_ = $ybody[0];
 
-        s/[{}]//g;
-        s/\\[A-Za-z]+//g;
-        s/^\s+//;
+        s/(?<!\\)\\[A-Za-z]+\s*//g;
+        s/(?<!\\)[{}]//g;
 
         &hanja_to_hangul;
         s/([\x{AC00}-\x{D7A3}])/syllable_to_jamo_chr($1)/ge;