diff options
author | Hans Hagen <pragma@wxs.nl> | 2020-10-31 00:09:22 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2020-10-31 00:09:22 +0100 |
commit | 7043cd3b7046f6a11112a5d49c4ae5e2dc0c6896 (patch) | |
tree | 92ffcd258fb29e37b4a136eb071fbfd0717be29e /tex/context/base/mkiv/typo-dir.mkxl | |
parent | a0270f13065d116355a953c6f246cbba26289fc2 (diff) | |
download | context-7043cd3b7046f6a11112a5d49c4ae5e2dc0c6896.tar.gz |
2020-10-30 22:27:00
Diffstat (limited to 'tex/context/base/mkiv/typo-dir.mkxl')
-rw-r--r-- | tex/context/base/mkiv/typo-dir.mkxl | 30 |
1 files changed, 15 insertions, 15 deletions
diff --git a/tex/context/base/mkiv/typo-dir.mkxl b/tex/context/base/mkiv/typo-dir.mkxl index 577434e56..e9c7e47d6 100644 --- a/tex/context/base/mkiv/typo-dir.mkxl +++ b/tex/context/base/mkiv/typo-dir.mkxl @@ -33,18 +33,18 @@ \installsimplecommandhandler \??directions {directions} \??directions % no \define... yet -\edef\lefttorightmark{\normalUchar"200E} \let\lrm\lefttorightmark -\edef\righttoleftmark{\normalUchar"200F} \let\rlm\righttoleftmark +\permanent\edef\lefttorightmark{\normalUchar"200E} \let\lrm\lefttorightmark % expandable +\permanent\edef\righttoleftmark{\normalUchar"200F} \let\rlm\righttoleftmark % expandable -\unexpanded\def\setdirection[#1]% todo: symbolic names +\permanent\protected\def\setdirection[#1]% todo: symbolic names {\clf_setdirection#1\relax} -% \unexpanded\def\resetdirection +% \protected\def\resetdirection % {\clf_setdirection\zerocount} % % is in fact: -\unexpanded\def\resetdirection +\protected\def\resetdirection {\c_attr_directions\attributeunsetvalue} \newconstant\directionsbidimode % this one might become pivate @@ -100,16 +100,16 @@ \c!break=\v!both, % experimental value, maybe \v!no will be default (bad name too) \c!fences=\v!yes] -\unexpanded\edef\bidilre{\normalUchar"202A} -\unexpanded\edef\bidirle{\normalUchar"202B} -\unexpanded\edef\bidipop{\normalUchar"202C} -\unexpanded\edef\bidilro{\normalUchar"202D} -\unexpanded\edef\bidirlo{\normalUchar"202E} +\permanent\protected\edef\bidilre{\normalUchar"202A} +\permanent\protected\edef\bidirle{\normalUchar"202B} +\permanent\protected\edef\bidipop{\normalUchar"202C} +\permanent\protected\edef\bidilro{\normalUchar"202D} +\permanent\protected\edef\bidirlo{\normalUchar"202E} -\unexpanded\def\dirlre{\ifcase\directionsbidimode\or\bidilre\or\textdirection\directionlefttoright\fi} -\unexpanded\def\dirrle{\ifcase\directionsbidimode\or\bidirle\or\textdirection\directionrighttoleft\fi} -\unexpanded\def\dirlro{\ifcase\directionsbidimode\or\bidilro\or\setdirection[3]\fi} -\unexpanded\def\dirrlo{\ifcase\directionsbidimode\or\bidirlo\or\setdirection[4]\fi} +\permanent\protected\def\dirlre{\ifcase\directionsbidimode\or\bidilre\or\textdirection\directionlefttoright\fi} +\permanent\protected\def\dirrle{\ifcase\directionsbidimode\or\bidirle\or\textdirection\directionrighttoleft\fi} +\permanent\protected\def\dirlro{\ifcase\directionsbidimode\or\bidilro\or\setdirection[3]\fi} +\permanent\protected\def\dirrlo{\ifcase\directionsbidimode\or\bidirlo\or\setdirection[4]\fi} % for the moment: \setdirection[\plusone] @@ -143,7 +143,7 @@ % end % \stopluacode % -% \unexpanded\def\biditest#1#2#3% font text raw +% \protected\def\biditest#1#2#3% font text raw % {\dontleavehmode\hbox % {\framed[offset=overlay]{\tttf#2}\quad % \enabletrackers[typesetters.directions]% |