From 6f502d70985b1abb5f47ee98758a1fd522b44512 Mon Sep 17 00:00:00 2001
From: Hironori Kitagawa <h_kitagawa2001@yahoo.co.jp>
Date: Wed, 25 Jul 2012 09:37:31 +0900
Subject: [PATCH] Fix #29105.

---
 src/luatexja-core.sty    | 2 +-
 src/patches/lltjfont.sty | 7 +++----
 2 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/src/luatexja-core.sty b/src/luatexja-core.sty
index 651d991..1faf272 100644
--- a/src/luatexja-core.sty
+++ b/src/luatexja-core.sty
@@ -261,7 +261,7 @@
   \expandafter\ltj@@set@stackfont#1:{mjscr}}
 \define@key[ltj]{japaram}{jascriptscriptfont}{%
   \expandafter\ltj@@set@stackfont#1:{mjss}}
-\def\ltj@@set@stackfont#1,#2:#3{%
+\protected\def\ltj@@set@stackfont#1,#2:#3{%
   \ltj@reset@globaldefs
   \ltj@tempcnta=\ltj@curjfnt\ltj@curjfnt=-1 #2%
   \ifnum\ltj@curjfnt=-1
diff --git a/src/patches/lltjfont.sty b/src/patches/lltjfont.sty
index 54a7cd1..e0d8ee8 100644
--- a/src/patches/lltjfont.sty
+++ b/src/patches/lltjfont.sty
@@ -621,11 +621,10 @@
   \pickup@jfont\let\scriptfont@name\font@name
   \xdef\font@name{\csname \string#2/\ssf@size\endcsname}%
   \pickup@jfont
-  \ltj@temptoks{\ltj@@set@stackfont}%
   \edef\math@fonts{\math@fonts\ltj@setpar@global%
-    \the\ltj@temptoks#1,\textfont@name:{mjtext}%
-    \the\ltj@temptoks#1,\scriptfont@name:{mjscr}%
-    \the\ltj@temptoks#1,\font@name:{mjss}%
+    \ltj@@set@stackfont#1,\textfont@name:{mjtext}%
+    \ltj@@set@stackfont#1,\scriptfont@name:{mjscr}%
+    \ltj@@set@stackfont#1,\font@name:{mjss}%
   }%
 }
 
-- 
2.11.0