fix

diff --git a/src/ltj-unicode-ccfix.lua b/src/ltj-unicode-ccfix.lua
index 660fa25..b071b22 100644 (file)
--- a/src/ltj-unicode-ccfix.lua
+++ b/src/ltj-unicode-ccfix.lua
@@ -1,7 +1,7 @@
 -- Do not edit this file!
--- Created from LineBreak.txt by ltj-unicode-ccfix_make.pl on 2015年  2月 12日 木曜日 13:28:31 JST.
+-- Created from LineBreak.txt by ltj-unicode-ccfix_make.pl on 2015年  2月 12日 木曜日 13:36:49 JST.
 -- In case of errors, fix the Perl script instead.
-do
+if tex.getcatcode(0x6F22)==12 then
   local tex_catcode = tex.setcatcode
   local function set_letter(b,e)
     for i=b,e do tex_catcode('global', i, 11) end