summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/supp-dir.mkiv
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2020-07-09 15:15:53 +0200
committerContext Git Mirror Bot <phg@phi-gamma.net>2020-07-09 15:15:53 +0200
commitb4260c7c04f7e82a9987b7bb758040853ebc464e (patch)
tree4191ca6d239722bb18d796f42a4fb8557f1e4a5c /tex/context/base/mkiv/supp-dir.mkiv
parent563c81a9faf538d1d1f362dc0a5e3bccc0de8023 (diff)
downloadcontext-b4260c7c04f7e82a9987b7bb758040853ebc464e.tar.gz
2020-07-09 14:50:00
Diffstat (limited to 'tex/context/base/mkiv/supp-dir.mkiv')
-rw-r--r--tex/context/base/mkiv/supp-dir.mkiv28
1 files changed, 14 insertions, 14 deletions
diff --git a/tex/context/base/mkiv/supp-dir.mkiv b/tex/context/base/mkiv/supp-dir.mkiv
index 277f2b7ca..e6c2a5869 100644
--- a/tex/context/base/mkiv/supp-dir.mkiv
+++ b/tex/context/base/mkiv/supp-dir.mkiv
@@ -18,19 +18,19 @@
\edef\??bdir{\ifdefined\bodydir bdir\else direction\fi}
-\unexpanded\edef\naturalhbox {\hbox \??bdir\directionlefttoright}
-\unexpanded\edef\naturalvbox {\vbox \??bdir\directionlefttoright}
-\unexpanded\edef\naturalvtop {\vtop \??bdir\directionlefttoright}
-\unexpanded\edef\naturalhpack {\hpack \??bdir\directionlefttoright}
-\unexpanded\edef\naturalvpack {\vpack \??bdir\directionlefttoright}
-\unexpanded\edef\naturaltpack {\tpack \??bdir\directionlefttoright}
-
-\unexpanded\edef\reversehbox {\hbox \??bdir\directionrighttoleft}
-\unexpanded\edef\reversevbox {\vbox \??bdir\directionrighttoleft}
-\unexpanded\edef\reversevtop {\vtop \??bdir\directionrighttoleft}
-\unexpanded\edef\reversehpack {\hpack \??bdir\directionrighttoleft}
-\unexpanded\edef\reversevpack {\vpack \??bdir\directionrighttoleft}
-\unexpanded\edef\reversetpack {\tpack \??bdir\directionrighttoleft}
+\protected\edef\naturalhbox {\hbox \??bdir\directionlefttoright}
+\protected\edef\naturalvbox {\vbox \??bdir\directionlefttoright}
+\protected\edef\naturalvtop {\vtop \??bdir\directionlefttoright}
+\protected\edef\naturalhpack {\hpack \??bdir\directionlefttoright}
+\protected\edef\naturalvpack {\vpack \??bdir\directionlefttoright}
+\protected\edef\naturaltpack {\tpack \??bdir\directionlefttoright}
+
+\protected\edef\reversehbox {\hbox \??bdir\directionrighttoleft}
+\protected\edef\reversevbox {\vbox \??bdir\directionrighttoleft}
+\protected\edef\reversevtop {\vtop \??bdir\directionrighttoleft}
+\protected\edef\reversehpack {\hpack \??bdir\directionrighttoleft}
+\protected\edef\reversevpack {\vpack \??bdir\directionrighttoleft}
+\protected\edef\reversetpack {\tpack \??bdir\directionrighttoleft}
\ifdefined\bodydir
\let\bodydir \undefined \let\normalbodydir \undefined
@@ -47,7 +47,7 @@
\def\syst_direction_string#1{\ifcase#1=\plusone r2l\else l2r\fi}
-\unexpanded\def\showdirsinmargin
+\protected\def\showdirsinmargin
{\normalexpanded{\inleft{\naturalhbox
{\ttxx[\syst_direction_string\pardirection,\syst_direction_string\textdirection]}}}}