lltjp-microtype (minimal)

diff --git a/src/ltj-latex.sty b/src/ltj-latex.sty
index 6b8fa81..446707b 100644 (file)
--- a/src/ltj-latex.sty
+++ b/src/ltj-latex.sty
@@ -81,6 +81,7 @@
 \ltj@pkgpatch{array}    %% at \begin{document}
 \ltj@pkgpatch@im{unicode-math}
 \ltj@pkgpatch@im{siunitx}
+\ltj@pkgpatch@im{microtype}
 
 \RequirePackage{lltjp-geometry}
 

diff --git a/src/patches/lltjp-microtype.sty b/src/patches/lltjp-microtype.sty
new file mode 100644 (file)
index 0000000..aacde2f
--- /dev/null
+++ b/src/patches/lltjp-microtype.sty
@@ -0,0 +1,19 @@
+%
+% lltjp-microtype.sty 2019-03-28
+%
+% (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}
+\endinput