X-Git-Url: http://git.osdn.net/view?p=luatex-ja%2Fluatexja.git;a=blobdiff_plain;f=src%2Fpatches%2Flltjp-microtype.sty;h=db2fac84813f1f989754d2578ef687d809de51eb;hp=740474cf67e7978b11a4cd73c963d0316d1f7678;hb=26142dfa8cafe366a32dff1459c8f0f4c60c83d3;hpb=9fd93bc374ea528f5e4bcf788154310c8745d9f5

diff --git a/src/patches/lltjp-microtype.sty b/src/patches/lltjp-microtype.sty
index 740474c..db2fac8 100644
--- a/src/patches/lltjp-microtype.sty
+++ b/src/patches/lltjp-microtype.sty
@@ -1,5 +1,5 @@
 %
-% lltjp-microtype.sty 2019-07-12
+% lltjp-microtype.sty 2019-08-12
 %
 % (Work in Progress)
 % 
@@ -9,12 +9,24 @@
 \makeatletter
 
 \def\MT@register@font{%
-  \xdef\MT@font@list{\expandonce{\MT@font@list}\MT@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,}%
+	\xdef\MT@font@list{\expandonce{\MT@font@list\font@name},}% !!!
   \fi}
+\let\ltj@MT@tracking@\MT@tracking@
+\def\MT@tracking@{%
+  \MT@exp@one@n\MT@in@clist\MT@font\MT@tr@font@list
+  \ifMT@inlist@\else
+    \MT@maybe@do{tr}%
+    \ifMT@do\else
+      \xdef\MT@tr@font@list{\expandonce{\MT@tr@font@list\MT@font,}}% !!!
+    \fi
+  \fi
+}
+\ifx\MT@tracking\ltj@MT@tracking@\let\MT@tracking\MT@tracking@\fi
+
 
 %\endinput
 \begingroup