Vertical Japanese fonts in ltjsclasses.

diff --git a/doc/ltjsclasses.pdf b/doc/ltjsclasses.pdf
index 01f0dc8..856968d 100644 (file)
Binary files a/doc/ltjsclasses.pdf and b/doc/ltjsclasses.pdf differ

diff --git a/src/ltjsarticle.cls b/src/ltjsarticle.cls
index bf37b64..f52b222 100644 (file)
--- a/src/ltjsarticle.cls
+++ b/src/ltjsarticle.cls
@@ -316,6 +316,8 @@
     \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.924872] \ltj@stdgtfont:jfm=ujis}{}
   \fi
 \fi
+\DeclareFontShape{JT3}{mc}{m}{n}{<-> s * [0.924872] \ltj@stdmcfont:jfm=ujisv}{}
+\DeclareFontShape{JT3}{gt}{m}{n}{<-> s * [0.924872] \ltj@stdgtfont:jfm=ujisv}{}
 \DeclareFontShape{JY3}{mc}{bx}{n}{<->ssub*gt/m/n}{}
 \DeclareFontShape{JY3}{gt}{bx}{n}{<->ssub*gt/m/n}{}
 \DeclareFontShape{JY3}{mc}{m}{it}{<->ssub*mc/m/n}{}

diff --git a/src/ltjsbook.cls b/src/ltjsbook.cls
index ad5f518..c7395e9 100644 (file)
--- a/src/ltjsbook.cls
+++ b/src/ltjsbook.cls
@@ -323,6 +323,8 @@
     \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.924872] \ltj@stdgtfont:jfm=ujis}{}
   \fi
 \fi
+\DeclareFontShape{JT3}{mc}{m}{n}{<-> s * [0.924872] \ltj@stdmcfont:jfm=ujisv}{}
+\DeclareFontShape{JT3}{gt}{m}{n}{<-> s * [0.924872] \ltj@stdgtfont:jfm=ujisv}{}
 \DeclareFontShape{JY3}{mc}{bx}{n}{<->ssub*gt/m/n}{}
 \DeclareFontShape{JY3}{gt}{bx}{n}{<->ssub*gt/m/n}{}
 \DeclareFontShape{JY3}{mc}{m}{it}{<->ssub*mc/m/n}{}

diff --git a/src/ltjsclasses.dtx b/src/ltjsclasses.dtx
index 2f5e3a9..5c2cccb 100644 (file)
--- a/src/ltjsclasses.dtx
+++ b/src/ltjsclasses.dtx
@@ -22,7 +22,7 @@
 %  -----------------------------------------
 %
 % \fi
-% \CheckSum{5205}
+% \CheckSum{5213}
 %% \CharacterTable
 %%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
 %%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
@@ -131,6 +131,7 @@
 % \end{itemize}
 %
 % [2014-02-07 LTJ] jsclasses 2014-02-07 ベースにしました．
+% [2014-07-26 LTJ] 縦組用和文フォントの設定を加えました．
 %
 % \StopEventually{}
 %
@@ -749,6 +750,8 @@
 % 何らかの理由で非埋め込みフォントが正しく利用できない場合にのみ |luatexja.cfg| によって
 % セットされるものです。
 %
+% [2014-07-26 LTJ] なお，現状のところ，縦組用JFMは |jfm-ujisv.lua| しか準備していません．
+%
 %    \begin{macrocode}
 %<*!jspf>
 \expandafter\let\csname JY3/mc/m/n/10\endcsname\relax
@@ -764,6 +767,8 @@
     \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.924872] \ltj@stdgtfont:jfm=ujis}{}
   \fi
 \fi
+\DeclareFontShape{JT3}{mc}{m}{n}{<-> s * [0.924872] \ltj@stdmcfont:jfm=ujisv}{}
+\DeclareFontShape{JT3}{gt}{m}{n}{<-> s * [0.924872] \ltj@stdgtfont:jfm=ujisv}{}
 %</!jspf>
 %    \end{macrocode}
 %
@@ -791,6 +796,8 @@
     \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.903375] \ltj@stdgtfont:jfm=ujis}{}
   \fi
 \fi
+\DeclareFontShape{JT3}{mc}{m}{n}{<-> s * [0.903375] \ltj@stdmcfont:jfm=ujisv}{}
+\DeclareFontShape{JT3}{gt}{m}{n}{<-> s * [0.903375] \ltj@stdgtfont:jfm=ujisv}{}
 %</jspf>
 %    \end{macrocode}
 %

diff --git a/src/ltjskiyou.cls b/src/ltjskiyou.cls
index 87671ea..bf93dbe 100644 (file)
--- a/src/ltjskiyou.cls
+++ b/src/ltjskiyou.cls
@@ -318,6 +318,8 @@
     \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.924872] \ltj@stdgtfont:jfm=ujis}{}
   \fi
 \fi
+\DeclareFontShape{JT3}{mc}{m}{n}{<-> s * [0.924872] \ltj@stdmcfont:jfm=ujisv}{}
+\DeclareFontShape{JT3}{gt}{m}{n}{<-> s * [0.924872] \ltj@stdgtfont:jfm=ujisv}{}
 \DeclareFontShape{JY3}{mc}{bx}{n}{<->ssub*gt/m/n}{}
 \DeclareFontShape{JY3}{gt}{bx}{n}{<->ssub*gt/m/n}{}
 \DeclareFontShape{JY3}{mc}{m}{it}{<->ssub*mc/m/n}{}

diff --git a/src/ltjspf.cls b/src/ltjspf.cls
index aed11b6..8e33ed9 100644 (file)
--- a/src/ltjspf.cls
+++ b/src/ltjspf.cls
@@ -316,6 +316,8 @@
     \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.903375] \ltj@stdgtfont:jfm=ujis}{}
   \fi
 \fi
+\DeclareFontShape{JT3}{mc}{m}{n}{<-> s * [0.903375] \ltj@stdmcfont:jfm=ujisv}{}
+\DeclareFontShape{JT3}{gt}{m}{n}{<-> s * [0.903375] \ltj@stdgtfont:jfm=ujisv}{}
 \DeclareFontShape{JY3}{mc}{bx}{n}{<->ssub*gt/m/n}{}
 \DeclareFontShape{JY3}{gt}{bx}{n}{<->ssub*gt/m/n}{}
 \DeclareFontShape{JY3}{mc}{m}{it}{<->ssub*mc/m/n}{}

diff --git a/test/test54-lltjext.tex b/test/test54-lltjext.tex
index 96bbd3f..81571fa 100644 (file)
--- a/test/test54-lltjext.tex
+++ b/test/test54-lltjext.tex
@@ -12,16 +12,16 @@
 \usepackage[a6paper,landscape,margin=10mm,top=5mm]{geometry}
 \let\mcdefault\gtdefault
 \let\rmdefault\sfdefault
-\newdimen\WIDTH\WIDTH30\Cwd
+\newdimen\WIDTH\WIDTH30\cwd
 
 \def\AX{\adjustbaseline
   \ifdefined\directlua\ltjsetparameter{autospacing=false, autoxspacing=false}%
   \else\noautospacing\noautoxspacing\fi}
 \def\TEST#1#2{\newpage
-\hbox to 40\Cwd{\hss\vtop{\hsize=\WIDTH#1
+\hbox to 40\cwd{\hss\vtop{\hsize=\WIDTH#1
 \normalsize
 \section{組方向: \string#1，ボックス: #2}
-\adjustbaseline
+\AX
 \paragraph{tabular}\
 
 あいうxyz%
@@ -57,63 +57,67 @@
 }}
 
 \newpage
-\hbox to 40\Cwd{\hss\vtop{\hsize=\WIDTH#1
+\hbox to 40\cwd{\hss\vtop{\hsize=\WIDTH#1
 \AX
 
 \paragraph{minipage}\
 
 あいうxyz%
-\begin{minipage}<#2>[t]{10\Cwd}
+\begin{minipage}<#2>[t]{10\cwd}
 そのため、
 仮に区単位でカテゴリコードを変更できるようにしても、SJIS版
 \end{minipage}あいうxyz%
-\begin{minipage}<#2>[c]{10\Cwd}
+\begin{minipage}<#2>[c]{10\cwd}
 そのため、
 仮に区単位でカテゴリコードを変更できるようにしても、SJIS版
 \end{minipage}\hfil\penalty0\hfilneg あいうxyz%
-\begin{minipage}<#2>[b]{10\Cwd}
+\begin{minipage}<#2>[b]{10\cwd}
 そのため、
 仮に区単位でカテゴリコードを変更できるようにしても、SJIS版
 \end{minipage}あいうxyz
 }}
 
 \newpage
-\hbox to 40\Cwd{\hss\vtop{\hsize=\WIDTH#1
+\hbox to 40\cwd{\hss\vtop{\hsize=\WIDTH#1
 \subsection*{組方向: \string#1，ボックス: #2 後半}
 \AX
 \paragraph{parbox}\
 
 あいうxyz\nobreak%
-\parbox<#2>[t]{10\Cwd}{%
+\parbox<#2>[t]{10\cwd}{%
 そのため、
 仮に区単位でカテゴリコードを変更できるようにしても、SJIS版}%
 えおabc\hfil\penalty0\hfilneg あいうxyz\nobreak%
-\parbox<#2>[c]{10\Cwd}{%
+\parbox<#2>[c]{10\cwd}{%
 そのため、
 仮に区単位でカテゴリコードを変更できるようにしても、SJIS版}%
 えおabc\hfil\penalty0\hfilneg あいうxyz\nobreak%
-\parbox<#2>[b]{10\Cwd}{%
+\parbox<#2>[b]{10\cwd}{%
 そのため、
 仮に区単位でカテゴリコードを変更できるようにしても、SJIS版}%
 えおabc
 }}
 
 \newpage
-\hbox to 40\Cwd{\hss\vtop{\hsize=\WIDTH#1
+\hbox to 40\cwd{\hss\vtop{\hsize=\WIDTH#1
 
 \paragraph{pbox}\
 
 \AX\noindent
-あいうxyz\nobreak\pbox<#2>[20\Cwd][l]{%
+あいうxyz\nobreak\pbox<#2>[20\cwd][l]{\AX%
   計算機科学（Computer Science）}えおabc\hfil\penalty0\hfilneg
-あいうxyz\nobreak\pbox<#2>[20\Cwd][c]{%
+あいうxyz\nobreak\pbox<#2>[20\cwd][c]{\AX%
   計算機科学（Computer Science）}えおabc\hfil\penalty0\hfilneg
-あいうxyz\nobreak\pbox<#2>[20\Cwd][r]{%
+あいうxyz\nobreak\pbox<#2>[20\cwd][r]{\AX%
   計算機科学（Computer Science）}えおabc
 
 }}}
 \begin{document}
-
+\ifdefined\directlua
+\message{\the\dimexpr 1\zw}%
+\else
+\message{\the\dimexpr 1zw}%
+\fi
 %\tracingifs2\tracingonline2
 \TEST{\yoko}{y}
 \TEST{\yoko}{t}

diff --git a/test/test54-res.pdf b/test/test54-res.pdf
index 8d5ec5c..8d9333c 100644 (file)
Binary files a/test/test54-res.pdf and b/test/test54-res.pdf differ