%
-% lltjp-microtype.sty 2019-07-12
+% lltjp-microtype.sty
%
% (Work in Progress)
%
\NeedsTeXFormat{LaTeX2e}
-
\RequirePackage{etoolbox}
-\RequirePackage{luatexja}
\makeatletter
-\def\MT@register@font{%
- \xdef\MT@font@list{\expandonce{\MT@font@list}\MT@font,}%
-}
-\def\MT@register@subst@font{\MT@exp@one@n\MT@in@clist\font@name\MT@font@list
- \ifMT@inlist@\else
- \xdef\MT@font@list{\expandonce{\MT@font@list}\font@name,}%
- \fi}
+\PackageWarningNoLine{luatexja}%
+ {LuaTeX-ja's patch against the microtype package \MessageBreak
+ (lltjp-microtype.sty, 2019-11-08) may not work}
+\patchcmd\MT@register@font
+ {\xdef\MT@font@list{\MT@font@list\MT@font,}}%
+ {\directlua{luatexja.jfont.is_kenc('\luatexluaescapestring{\f@encoding}')}%
+ \unless\ifin@
+ \xdef\MT@font@list{\MT@font@list\MT@font,}%
+ \fi
+ }{}{}
+\patchcmd\MT@register@subst@font
+ {\xdef\MT@font@list{\MT@font@list\font@name,}}%
+ {\directlua{luatexja.jfont.is_kenc('\luatexluaescapestring{\f@encoding}')}%
+ \unless\ifin@
+ \xdef\MT@font@list{\MT@font@list\font@name,}%
+ \fi}{}{}
+\let\ltj@MT@tracking@\MT@tracking@
+\patchcmd\MT@tracking@
+ {\xdef\MT@tr@font@list{\MT@tr@font@list\MT@font,}}%
+ {\directlua{luatexja.jfont.is_kenc('\luatexluaescapestring{\f@encoding}')}%
+ \unless\ifin@
+ \xdef\MT@tr@font@list{\MT@tr@font@list\MT@font,}%
+ \fi}{}{}
+\ifx\MT@tracking\ltj@MT@tracking@\let\MT@tracking\MT@tracking@\fi
%\endinput
\begingroup