From: Hironori Kitagawa <h_kitagawa2001@yahoo.co.jp>
Date: Sat, 22 Sep 2012 00:38:25 +0000 (+0900)
Subject: Bug fix of \ltjgetparameter{jacharrange}.
X-Git-Tag: 20121209.0~33
X-Git-Url: http://git.osdn.net/view?p=luatex-ja%2Fluatexja.git;a=commitdiff_plain;h=05154b0c3459e40ef5d7aef48eb16337c2a020ed

Bug fix of \ltjgetparameter{jacharrange}.
---

diff --git a/src/luatexja.lua b/src/luatexja.lua
index 98b0ae7..1aa5c89 100644
--- a/src/luatexja.lua
+++ b/src/luatexja.lua
@@ -180,14 +180,15 @@ function luatexja.ext_get_parameter_binary(k,c)
       c=0
    end
    if k == 'jacharrange' then
-      if c<0 or c>216 then 
+      if c>216 then 
 	 ltjb.package_error('luatexja',
 			    'invalid character range number (' .. c .. ')',
 			    'A character range number should be in the range 0..216,\n'..
 			     'So I changed this one to zero.')
 	 c=0
       end
-      tex.write(ltjc.get_range_setting(c))
+      -- 負の値は <U+0080 の文字の文字範囲，として出てくる．この時はいつも欧文文字なので 1 を返す
+      tex.write( (c<0) and -1 or ltjc.get_range_setting(c))
    else
       if c<0 or c>0x10FFFF then
 	 ltjb.package_error('luatexja',