X-Git-Url: http://git.osdn.jp/view?a=blobdiff_plain;f=src%2Fluatexja-compat.sty;h=7feb21a499b749c06d2561dd38da235e25f44c69;hb=cf51a2259a27eeed9a3d5d0c40c767a5e6bc403e;hp=79687d7555c94aef72b5805332c9883a7a5e77bb;hpb=880636d81e9819b31dec8a5f897bbfaf1732d18b;p=luatex-ja%2Fluatexja.git

diff --git a/src/luatexja-compat.sty b/src/luatexja-compat.sty
index 79687d7..7feb21a 100644
--- a/src/luatexja-compat.sty
+++ b/src/luatexja-compat.sty
@@ -65,26 +65,27 @@
   \expandafter\let\csname ifltj@in@latex\expandafter\endcsname
     \csname iftrue\endcsname
   \NeedsTeXFormat{LaTeX2e}
-  \ProvidesPackage{luatexja-compat}[2011/04/01 v0.1]
+  \ProvidesPackage{luatexja-compat}[2013/05/14 Compatibility with pTeX]
 \fi                             %</LaTeX>
 
-%% If the engine is pTeX, then load the module for it and exit.
-\edef\ltj@@tempa{\string\kansuji}
-\edef\ltj@@tempb{\meaning\kansuji}
-\ifx\ltj@@tempa\ltj@@tempb      %<*pTeX>
-  \let\ltj@@compat@pTeX=t
-  \ifltj@in@latex                 %<*LaTeX>
-    \RequirePackage{ltj-compat-ptex}[2012/04/21]
-  \else                           %<*!LaTeX>
-    \input ltj-compat-ptex.sty %
-  \fi                             %</LaTeX>
-  \ltj@compat@AtEnd
-\expandafter\endinput\fi\relax  %</pTeX>
+% ltj-compat-ptex.sty is not maintained for a long time.
+% %% If the engine is pTeX, then load the module for it and exit.
+% \edef\ltj@@tempa{\string\kansuji}
+% \edef\ltj@@tempb{\meaning\kansuji}
+% \ifx\ltj@@tempa\ltj@@tempb      %<*pTeX>
+%   \let\ltj@@compat@pTeX=t
+%   \ifltj@in@latex                 %<*LaTeX>
+%     \RequirePackage{ltj-compat-ptex}[2012/04/21]
+%   \else                           %<*!LaTeX>
+%     \input ltj-compat-ptex.sty %
+%   \fi                             %</LaTeX>
+%   \ltj@compat@AtEnd
+% \expandafter\endinput\fi\relax  %</pTeX>
 
 % Load core module if not yet.
 \ifx\luatexjacoreLoaded\@undefined
   \ifltj@in@latex                 %<*LaTeX>
-    \RequirePackage{luatexja-core}[2012/04/20]
+    \RequirePackage{luatexja-core}[2013/05/14]
   \else                           %<*!LaTeX>
     \input luatexja-core.sty %
   \fi                             %</LaTeX>
@@ -122,7 +123,7 @@
    \ltj@code@convB\ltj@grab@num
 }
 \def\ltj@code@convB#1{%
-  \directlua{luatexja._cc_next(\ltj@safe@num{#1}) }%
+  \directlua{luatexja._cc_next(\ltj@safe@num@or{nil}{#1}) }%
 }
 
 \def\kansuji{%
@@ -133,7 +134,7 @@
   \directlua{luatexja.compat.to_kansuji(\ltj@safe@num{#1}) }%
 }
 \define@key[ltj]{japaram}{kansujichar}{%
-  \expandafter\ltj@@set@stack#1:{ksj}{0}{0x7FFFFFFF}}
+  \expandafter\ltj@@set@stack#1:{KSJ}{0}{0x7FFFFFFF}}
 
 \ltjsetparameter{kansujichar={0,`〇}}
 \ltjsetparameter{kansujichar={1,`一}}