\jfont\testC={psft:AdobeMingStd-Light:cid=Adobe-CNS1-7;jfm=jis} % Traditional Chinese
\jfont\testG={psft:SimSun:cid=Adobe-GB1-5;jfm=jis} % Simplified Chinese
\jfont\testK={psft:Batang:cid=Adobe-Korea1-2;jfm=jis} % Korean
+\jfont\testKR={psft:SourceHanSerifAKR9:cid=Adobe-KR-9;jfm=jis} % Korean
\end{lstlisting}
%<*en>
Note that the code above specifies \texttt{jfm-jis.lua}, which is for Japanese fonts,
%</ja>
%<*en>
-At present, \LuaTeX-ja supports only 4 values written in the sample code above.
+At present, \LuaTeX-ja supports only 5 values written in the sample code above.
Specifying other values, e.g.,
%</en>
%<*ja>
-今のところ,\LuaTeX-jaは上のサンプルコード中に書いた4つの値しかサポートしていない.
+今のところ,\LuaTeX-jaは上のサンプルコード中に書いた5つの値しかサポートしていない.
%</ja>
\begin{lstlisting}
\jfont\test={psft:Ryumin-Light:cid=Adobe-Japan2;jfm=jis}
cidinfo.ordering ~= "Japan1" and
cidinfo.ordering ~= "GB1" and
cidinfo.ordering ~= "CNS1" and
- cidinfo.ordering ~= "Korea1" then
+ cidinfo.ordering ~= "Korea1" and
+ cidinfo.ordering ~= "KR" then
-- ltjb.package_warning('luatexja-otf',
-- 'Current Japanese font (or other CJK font) "'
-- ..curjfnt.psname..'" is not a CID-Keyed font (Adobe-Japan1 etc.)')
end
local function open_cmap_file(name, inc, cid_dec, mke)
- fh = io.open(kpse.find_file(name, 'cmap files'), "r")
- line = fh:read("*l")
- while line do
- if string.find(line, "%x+%s+begin...?char") then
- load_cid_char(cid_dec, mke)
- elseif string.find(line, "%x+%s+begin...?range") then
- load_cid_range(inc, cid_dec, mke)
- else
- line = fh:read("*l")
+ local fn = kpse.find_file(name, 'cmap files')
+ if fn then
+ local fh = io.open(fn, "r")
+ line = fh:read("*l")
+ while line do
+ if string.find(line, "%x+%s+begin...?char") then
+ load_cid_char(cid_dec, mke)
+ elseif string.find(line, "%x+%s+begin...?range") then
+ load_cid_range(inc, cid_dec, mke)
+ else
+ line = fh:read("*l")
+ end
end
+ fh:close();
end
- fh:close();
end
local function increment(a) return a+1 end
if name:sub(1,1)=="{" and name:sub(-1)=="}" then name = name:sub(2,-2) end
local p = name:find(":") or 0
if name:sub(1, p-1) == 'psft' then
- local s = "Adobe-Japan1-6"
+ local s = "Adobe-Japan1-7"
local basename = name:sub(p+1)
local p = basename:find(":")
local q = basename:find("/[BI][BI]?")