lltjp-microtype.sty: removed wrong patch for now

[luatex-ja/luatexja.git] / src / patches / lltjp-microtype.sty

diff --git a/src/patches/lltjp-microtype.sty b/src/patches/lltjp-microtype.sty
index 8b71f59..f3a5440 100644 (file)
--- a/src/patches/lltjp-microtype.sty
+++ b/src/patches/lltjp-microtype.sty
@@ -1,32 +1,22 @@
 %
-% lltjp-microtype.sty 2019-03-29
+% lltjp-microtype.sty 2019-10-29
 %
 % (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
 \begingroup
   \catcode`\/=\z@
   /MT@map@tlist@n{/\LτJCHAREX}/@makeother /lccode`/τ=`/t
   /lowercase{%
     /def/x{/endgroup
+      /def/MT@charstring{\CHAR"}%
       /def/MT@is@char##1\CHAR"##2##3##4/relax{%
                %/message{MIC <##1><##2><##3><##4>}%
         /ifx/relax##4/relax
-            /expandafter/MT@is@char@ltja/MT@strip@prefix##1/relax\LτJALCHAR\LτJALCHAR/relax
+            /expandafter/MT@is@char@ltja/MT@strip@prefix##1>/relax\LτJALCHAR\LτJALCHAR/relax
         /else
           /ifx/relax##1/relax
             /if##3\/relax
@@ -40,15 +30,16 @@
           /fi
         /fi
       }%
+      /def/MT@ltjs@drop@##1>##2/relax{##1}%
       /def/MT@is@char@ltja##1\LτJALCHAR##2\LτJALCHAR##3/relax{%
+        %/typeout{MICLTJA <##1><##2><##3>}%
         /ifx/relax##1/relax
           /ifx/relax##2/relax/else
-            /edef/MT@char@{/number##2}%
+            /edef/MT@char@{/expandafter/number/MT@ltjs@drop@##2>/relax}%
           /fi
         /fi
       }%
     }%
   }
 /x
-
 \endinput