X-Git-Url: http://git.osdn.jp/view?a=blobdiff_plain;f=src%2Fltj-inputbuf.lua;h=f97f966039b45ca90cad037765bfae36b2e27801;hb=79acad85e3b942cd4fe555c40886ad295b487fce;hp=f527f341c71ce39fb8d257334c181c231da2db2c;hpb=ae6b66530a4e01e6f76819b86f748e46eb6bcb78;p=luatex-ja%2Fluatexja.git diff --git a/src/ltj-inputbuf.lua b/src/ltj-inputbuf.lua index f527f34..f97f966 100644 --- a/src/ltj-inputbuf.lua +++ b/src/ltj-inputbuf.lua @@ -1,14 +1,6 @@ -- --- luatexja/inputbuf.lua +-- luatexja/ltj-inputbuf.lua -- -luatexbase.provides_module({ - name = 'luatexja.inputbuf', - date = '2011/04/01', - version = '0.1', - description = 'Supressing a space by newline after Japanese characters', -}) -module('luatexja.inputbuf', package.seeall) -local err, warn, info, log = luatexbase.errwarinf(_NAME) luatexja.load_module('charrange'); local ltjc = luatexja.charrange @@ -20,7 +12,7 @@ local ltjc_is_ucs_in_japanese_char = ltjc.is_ucs_in_japanese_char --- the following function is modified from jafontspec.lua (by K. Maeda). --- Instead of "%", we use U+FFFFF for suppressing spaces. -function add_comment(buffer) +local function add_comment(buffer) local i = utf.len(buffer) while (i>0) and (getcatcode(utf.byte(buffer, i))==1 or getcatcode(utf.byte(buffer, i))==2) do