- \directlua{luatexja.jfont.clear_alt_font_latex(
- '\luatexluaescapestring{#1/#2/#3/#4}')}}
-
-% \selectfont 上書き
-\let\ltj@@alt@selectfont@orig=\selectfont
-\def\selectfont{%
- \ltj@@alt@selectfont@orig
- \ltj@@does@alt@set{\curr@kfontshape}
- % alt fonts の定義
- \directlua{luatexja.jfont.output_alt_font_cmd('\luatexluaescapestring{\curr@kfontshape}')}%
- % 定義した alt fonts のデータを \ltjdeclarealtfont に渡すのと同等の処理をする
- \directlua{luatexja.jfont.pickup_alt_font_a('\f@size')}%
- \fi
-}
-%\let\selectfont=\ltj@@alt@selectfont@orig