% % luatexja-adjust.sty % %% Avoid multiple loading. \csname\if11luatexjaadjustLoaded\fi\endcsname \edef\x{% \catcode32=\the\catcode32% \catcode33=\the\catcode33% \catcode35=\the\catcode35% \catcode40=\the\catcode40% \catcode41=\the\catcode41% \catcode42=\the\catcode42% \catcode43=\the\catcode43% \catcode44=\the\catcode44% \catcode45=\the\catcode45% \catcode46=\the\catcode46% \catcode58=\the\catcode58% \catcode59=\the\catcode59% \catcode60=\the\catcode60% \catcode61=\the\catcode61% \catcode62=\the\catcode62% \catcode64=\the\catcode64% \catcode91=\the\catcode91% \catcode93=\the\catcode93% \catcode94=\the\catcode94% \catcode95=\the\catcode95% \catcode126=\the\catcode126% \endlinechar=\the\endlinechar \relax} \catcode32=10 %< > \catcode33=12 %<"> \catcode35=6 %<#> \catcode40=12 %<(> \catcode41=12 %<)> \catcode42=12 %<*> \catcode43=12 %<+> \catcode44=12 %<,> \catcode45=12 %<-> \catcode46=12 %<.> \catcode58=12 %<:> \catcode59=12 %<;> \catcode60=12 %<<> \catcode61=12 %<=> \catcode62=12 %<>> \catcode64=11 %<@> \catcode91=12 %<[> \catcode93=12 %<]> \catcode94=7 %<^> \catcode95=8 %<_> \catcode126=13 %<~> \endlinechar=-1 % \edef\ltj@adjust@AtEnd{\x \noexpand\let\noexpand\ltj@adjust@AtEnd\relax} \def\luatexjaadjustLoaded{\endinput} %% Check if LaTeX is used. \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname RequirePackage\endcsname\relax %<*!LaTeX> \expandafter\let\csname ifltj@in@latex\expandafter\endcsname \csname iffalse\endcsname \else %<*LaTeX> \expandafter\let\csname ifltj@in@latex\expandafter\endcsname \csname iftrue\endcsname \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{luatexja-adjust}[2013/05/14] \fi % % Load core module if not yet. \ifx\luatexjacoreLoaded\@undefined \ifltj@in@latex %<*LaTeX> \RequirePackage{luatexja}[2013/05/14] \else %<*!LaTeX> \input luatexja.sty % \fi % \fi %% When environment check fails, exit now. \ifx\LuaTeXjaAvailable\@undefined \ltj@otf@AtEnd \expandafter\endinput\fi\relax %%------------------ %! Main part of luatexja-adjust \RequireLuaTeXjaSubmodule{adjust} % enable/disable ``advanced'' line adjustment \protected\def\ltjdisableadjust{\directlua{luatexja.adjust.disable_cb()}} \protected\def\ltjenableadjust{\directlua{luatexja.adjust.enable_cb()}} \ltjenableadjust % there is also a key for \ltjsetparameter, for same effect \define@boolkey[ltj]{japaram}{adjust}[true]{% \ifltj@japaram@adjust\ltjenableadjust\else\ltjdisableadjust\fi } %%------------------ all done \ltj@adjust@AtEnd \endinput %% EOF