From 01b69c78ff33854f7f28149e8167cb4219fcb416 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 14 Feb 2022 03:01:43 +0000 Subject: CTAN sync 202202140301 --- macros/xetex/latex/bidi-atbegshi/test-RTL.tex | 23 ++++++++++++----------- 1 file changed, 12 insertions(+), 11 deletions(-) (limited to 'macros/xetex/latex/bidi-atbegshi/test-RTL.tex') diff --git a/macros/xetex/latex/bidi-atbegshi/test-RTL.tex b/macros/xetex/latex/bidi-atbegshi/test-RTL.tex index a4d416176b..5ce8c975b9 100644 --- a/macros/xetex/latex/bidi-atbegshi/test-RTL.tex +++ b/macros/xetex/latex/bidi-atbegshi/test-RTL.tex @@ -1,25 +1,26 @@ \documentclass{article} -\usepackage{lipsum} \usepackage{bidi-atbegshi} -\usepackage[RTLdocument]{bidi} -\setbox0\hbox{\Huge\textbf{Upper Left}} -\setbox1\hbox{\Huge\textbf{Upper Right}} -\setbox2\hbox{\Huge\textbf{Lower Left}} -\setbox3\hbox{\Huge\textbf{Lower Right}} +\usepackage{ptext} +\usepackage{xepersian} +\settextfont{IRXLotus} +\setbox0\hboxR{\Huge\textbf{چپ بالا}} +\setbox1\hboxR{\Huge\textbf{راست بالا}} +\setbox2\hboxR{\Huge\textbf{چپ پایین}} +\setbox3\hboxR{\Huge\textbf{راست پایین}} \AtBeginShipout{% \AtBeginShipoutUpperRight{% -\put(0,\LengthToUnit{-\ht1}){\usebox1} +\put(-\wd1,-\ht1){\usebox1} }% \AtBeginShipoutUpperLeft{% -\put(\LengthToUnit{-\wd0},\LengthToUnit{-\ht0}){\usebox0} +\put(0,-\ht0){\usebox0} }% \AtBeginShipoutLowerRight{% -\put(0,\LengthToUnit{\dp3}){\usebox3} +\put(-\wd3,\dp3){\usebox3} }% \AtBeginShipoutLowerLeft{% -\put(\LengthToUnit{-\wd2},\LengthToUnit{\dp2}){\usebox2} +\put(0,\dp2){\usebox2} }% } \begin{document} -\lipsum +\ptext \end{document} \ No newline at end of file -- cgit v1.2.3