summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/xetex/xetexko/xetexko-vertical.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/xetex/xetexko/xetexko-vertical.sty')
-rw-r--r--Master/texmf-dist/tex/xetex/xetexko/xetexko-vertical.sty34
1 files changed, 15 insertions, 19 deletions
diff --git a/Master/texmf-dist/tex/xetex/xetexko/xetexko-vertical.sty b/Master/texmf-dist/tex/xetex/xetexko/xetexko-vertical.sty
index 1ac187205c0..2d94aec0744 100644
--- a/Master/texmf-dist/tex/xetex/xetexko/xetexko-vertical.sty
+++ b/Master/texmf-dist/tex/xetex/xetexko/xetexko-vertical.sty
@@ -16,12 +16,17 @@
[2014/06/17 v2.7 Vertical environment for XeTeX-ko]
\fi
-\unless\ifcsname @tempdima\endcsname\newdimen\@tempdima\fi
-\unless\ifcsname @tempdimb\endcsname\newdimen\@tempdimb\fi
-\unless\ifcsname @tempdimc\endcsname\newdimen\@tempdimc\fi
-
% do not veticalize headline/footline
-\ifdefined\ProvidesPackage % for latex
+\begingroup\expandafter\expandafter\expandafter\endgroup
+\expandafter\ifx\csname selectfont\endcsname\relax % plain
+ \protected\def\verticaltypesetting{%
+ \dimen@\hsize\hsize\vsize\vsize\dimen@
+ \edef\plainoutput{\unexpanded{\dimen@\hsize\hsize\vsize\vsize\dimen@}%
+ \unexpanded\expandafter{\plainoutput}}%
+ \def\pagebody{\setbox\z@\vbox to\hsize{\boxmaxdepth=\maxdepth
+ \pagecontents}\xetexko@rotatebox\z@\box\z@}%
+ \maxdepth\z@ \XK@vertical@spacing}
+\else % latex
\protected\def\verticaltypesetting{%
\AtBeginDocument{\XK@vertical@spacing}%
\maxdepth\z@
@@ -33,14 +38,6 @@
\unexpanded\expandafter{\@outputpage}}%
}
\@onlypreamble\verticaltypesetting
-\else % for plain
- \protected\def\verticaltypesetting{%
- \dimen@\hsize\hsize\vsize\vsize\dimen@
- \edef\plainoutput{\unexpanded{\dimen@\hsize\hsize\vsize\vsize\dimen@}%
- \unexpanded\expandafter{\plainoutput}}%
- \def\pagebody{\setbox\z@\vbox to\hsize{\boxmaxdepth=\maxdepth
- \pagecontents}\xetexko@rotatebox\z@\box\z@}%
- \maxdepth\z@ \XK@vertical@spacing}
\fi
\def\xetexko@rotatebox#1{%
@@ -88,11 +85,10 @@
\protected\def\endvertical{%
\egroup
- \@tempdima\wd\z@
- \@tempdimb\ht\z@
- \@tempdimc\dp\z@
+ \dimen@\dimexpr\ht\z@+\dp\z@\relax
+ \dimen@ii\dimexpr\wd\z@-\dp\z@\relax
\setbox\z@\hbox{%
- \kern\dimexpr\@tempdimb+0.5em\relax
+ \kern\dimexpr\ht\z@+0.5em\relax
\wd\z@\z@
\ht\z@\z@
\dp\z@\z@
@@ -100,11 +96,11 @@
\special{x:rotate -90}%
\box\z@
\special{x:grestore}}%
- \wd\z@\dimexpr\@tempdimb+\@tempdimc\relax
+ \wd\z@\dimen@
\ht\z@\z@
\dp\z@\z@
\leavevmode
- \raise\dimexpr\@tempdima-\@tempdimc\relax\box\z@
+ \raise\dimen@ii\box\z@
}
\protected\def\vertlatin#1{\leavevmode\lower0.5ex\hbox{\latinmarks #1}}