lltjp-unicode-math.sty: recent unicode-math.sty does not have \ProvidesPackage, so...

diff --git a/src/patches/lltjp-unicode-math.sty b/src/patches/lltjp-unicode-math.sty
index ec5aecf..d815d8d 100644 (file)
--- a/src/patches/lltjp-unicode-math.sty
+++ b/src/patches/lltjp-unicode-math.sty
@@ -3,7 +3,7 @@
 %
 
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{lltjp-unicode-math}[2017/05/05 Patch to unicode-math for LuaTeX-ja]
+\ProvidesPackage{lltjp-unicode-math}[2017-10-08 Patch to unicode-math for LuaTeX-ja]
 
 \RequirePackage{unicode-math,luatexja}
 
@@ -11,9 +11,9 @@
 
 \group_begin:
   \bool_new:N \lltjp_um_patch_mathgroup_bool
-\@ifpackagelater{unicode-math}{2015/09/24}{%
-%%%%%%%% 2015/09/24 0.8c
   \bool_set_true:N \lltjp_um_patch_mathgroup_bool
+%% Recent unicode-math (2017-10-02, v0.8g) does not have \ProvidesPackage,
+%% So we can't use the date option of \@ifpackageloaded.
   \cs_gset:Nn \__um_define_math_chars: {
     \group_begin:
       \cs_set:Npn \__um_sym:nnn ##1##2##3
@@ -29,30 +29,11 @@
       \__um_input_math_symbol_table:
     \group_end:
   }
-}{
-  \cs_if_exist:cTF { __um_cs_set_eq_active_char:Nw } {
-    \tl_set:Nn \l_tmpa_tl { __um_cs_set_eq_active_char:Nw }
-    \bool_set_true:N \lltjp_um_patch_mathgroup_bool
-  }{
-    \tl_set:Nn \l_tmpa_tl { um_cs_set_eq_active_char:Nw }
-  }
-  \cs_gset:cpn { \tl_use:N \l_tmpa_tl } #1 = "#2 \q_nil {%"
-    \group_begin:
-      %\typeout {um: \string#1, \int_from_hex:n {#2}, #2}% <- for debug
-      \char_set_lccode:nn { `! } { "#2 }%"
-      \tex_lowercase:D {
-        \tl_set:Nn \l_tmpa_tl {  \relax
-          \ifmmode!\else{\directlua{tex.globaldefs = 0}\ltj@allalchar!}\fi}
-        \cs_gset_eq:NN #1 \l_tmpa_tl
-      }
-      \ltjsetmathletter{ \int_from_hex:n {#2} }
-    \group_end:
-  }
-}
 
 \bool_if:NT \lltjp_um_patch_mathgroup_bool {
   \cs_gset:Npn \use@mathgroup #1 #2
    {
+    %\typeout{UM <#1><#2>}
     \mode_if_math:T % <- not sure if this is really necessary since we've just checked for mmode and raised an error if not!
      {
       \math@bgroup