X-Git-Url: http://git.osdn.jp/view?a=blobdiff_plain;f=test%2Ftest22-ltjs-mag.tex;h=a29b711737f677177b376082b307463a9418aacb;hb=f078ac2f7998a102c7ec765e725f2269eed9f872;hp=e059e0b4fe99e70bbd1e0dbf5708d76676fd781d;hpb=dd366948cd8acadad123bd93751b623e9be91191;p=luatex-ja%2Fluatexja.git diff --git a/test/test22-ltjs-mag.tex b/test/test22-ltjs-mag.tex index e059e0b..a29b711 100644 --- a/test/test22-ltjs-mag.tex +++ b/test/test22-ltjs-mag.tex @@ -1,9 +1,13 @@ -\batchmode\directlua{ +\batchmode +%\loggingall +\directlua{ luatexbase.module_warning=function()end } \ifdefined\fsize\else\def\fsize{10pt}\fi -\edef\head{\noexpand\documentclass[\fsize,xreal]{ltjsarticle}} -\head\usepackage{type1cm} +\edef\head{\noexpand\documentclass[\fsize,nomag*]{ltjsarticle}} +\head%\listfiles +\usepackage{type1cm}\usepackage[OT1]{fontenc} +\def\rmdefault{cmr} \makeatletter \let\ltj@selectfont@patch\relax \newcount\cI\newcount\cF\newdimen\szd @@ -16,26 +20,26 @@ \fi } \def\S#1{% - \setbox0\hbox{\fontsize{#1\ltjs@mpt}{10}\selectfont - \@tempdimb=#1\ltjs@mpt + \setbox0\hbox{\fontsize{#1\jsc@mpt}{10}\selectfont + \@tempdimb=#1\jsc@mpt \edef\@tempa{\scantextokens\expandafter{\fontname\font}\space at\space at}% \expandafter\S@\@tempa\@nil }% } \def\ltjs@setfontsize#1#2#3{% - \edef\Fsize{\the\dimexpr\directlua{tex.sprint(#2*\ltjs@magscale)}pt}% - \@setfontsize#1{#2\ltjs@mpt}{#3\ltjs@mpt}} + \edef\Fsize{\the\dimexpr\directlua{tex.sprint(#2*\jsc@magscale)}pt}% + \@setfontsize#1{#2\jsc@mpt}{#3\jsc@mpt}} \def\R#1{{% #1\message{^^J\string#1: \fontname\font\space (ideal: \Fsize)}% }} \def\T@#1#2#3{\global\count@=} \def\T#1#2{% - \setbox0\hbox{\fontsize{#1\ltjs@mpt}{10}\selectfont + \setbox0\hbox{\fontsize{#1\jsc@mpt}{10}\selectfont \expandafter\T@\romannumeral-`0\fontname\font }% \ifnum\count@=#2\else - \typeout{@FAIL: #1\string\ltjs@mpt\space selects cmr\the\count@ + \typeout{@FAIL: #1\string\ljsc@mpt\space selects cmr\the\count@ \space(should be cmr#2)}\szd=1pt% \fi }