- local pof, pcj = getfont(p), has_attr(p, attr_curjfnt)
- local pf = ltjf_replace_altfont(pcj or pof, pc)
- if pof~=pf then setfield(p, 'font', pf) end
- if pcj~=pf then set_attr(p, attr_curjfnt, pf) end
- setfield(p, 'subtype', floor(getsubtype(p)*0.5)*2)
- set_attr(p, attr_orig_char, pc)
+ local pf = ltjf_replace_altfont(has_attr(p, attr_curjfnt) or getfont(p), pc)
+ setfield(p, 'font', pf); setfield(p, 'lang', lang_ja)
+ ltjs_orig_char_table[p] = pc