diff options
author | Hans Hagen <pragma@wxs.nl> | 2019-12-30 20:42:59 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2019-12-30 20:42:59 +0100 |
commit | 54732448eb933607bdcb11a457756741dc4e0b44 (patch) | |
tree | d0f312dd29af54ee85d89f6d6f242be7ee6b5454 /tex/context/base/mkiv/spac-ali.mkiv | |
parent | ede5a2aae42ff502be35d800e97271cf0bdc889b (diff) | |
download | context-54732448eb933607bdcb11a457756741dc4e0b44.tar.gz |
2019-12-30 19:16:00
Diffstat (limited to 'tex/context/base/mkiv/spac-ali.mkiv')
-rw-r--r-- | tex/context/base/mkiv/spac-ali.mkiv | 42 |
1 files changed, 12 insertions, 30 deletions
diff --git a/tex/context/base/mkiv/spac-ali.mkiv b/tex/context/base/mkiv/spac-ali.mkiv index f80b1a192..8451e2494 100644 --- a/tex/context/base/mkiv/spac-ali.mkiv +++ b/tex/context/base/mkiv/spac-ali.mkiv @@ -1153,26 +1153,6 @@ \letvalue{\??alignsimplereverse\v!flushright}\spac_align_simple_left \letvalue{\??alignsimplereverse\v!middle }\spac_align_simple_middle -% \unexpanded\def\simplealignedbox#1#2% -% {\hbox \ifdim#1>\zeropoint to #1 -% \csname\??alignsimple\ifcsname\??alignsimple#2\endcsname#2\else\v!right\fi\expandafter\endcsname -% \fi} - -% \unexpanded\def\simplealignedboxplus#1#2#3% -% {\hbox #3 \ifdim#1>\zeropoint to #1 -% \csname\??alignsimple\ifcsname\??alignsimple#2\endcsname#2\else\v!right\fi\expandafter\endcsname -% \fi} - -% \unexpanded\def\simplealignedbox#1#2% -% {\hbox \ifdim#1>\zeropoint to #1 -% \csname\??alignsimple\ifcsname\??alignsimple#2\endcsname#2\else\v!right\fi\expandafter\endcsname -% \fi} -% -% \unexpanded\def\simplealignedboxplus#1#2#3% -% {\hbox #3 \ifdim#1>\zeropoint to #1 -% \csname\??alignsimple\ifcsname\??alignsimple#2\endcsname#2\else\v!right\fi\expandafter\endcsname -% \fi} - \unexpanded\def\simplealignedbox#1#2% {\hbox \ifdim#1>\zeropoint to #1 \ifcsname\??alignsimple#2\endcsname @@ -1202,16 +1182,6 @@ \newconditional\alignsimplelefttoright \settrue\alignsimplelefttoright -% \unexpanded\def\simplereversealignedbox#1#2% -% {\hbox \ifdim#1>\zeropoint to #1 -% \csname\??alignsimplereverse\ifcsname\??alignsimplereverse#2\endcsname#2\else\v!left\fi\expandafter\endcsname -% \fi} -% -% \unexpanded\def\simplereversealignedboxplus#1#2#3% -% {\hbox #3 \ifdim#1>\zeropoint to #1 -% \csname\??alignsimplereverse\ifcsname\??alignsimplereverse#2\endcsname#2\else\v!left\fi\expandafter\endcsname -% \fi} - \unexpanded\def\simplereversealignedbox#1#2% {\hbox \ifdim#1>\zeropoint to #1 \ifcsname\??alignsimplereverse#2\endcsname @@ -1253,5 +1223,17 @@ \def\spac_align_definehbox[#1][#2]% {\setvalue{hbox#1}##1{\hbox to #2{\begstrut##1\endstrut\hss}}} +%D Some direction related helpers: + +\installcorenamespace {reverse} + +\setvalue{\??reverse\v!normal }{\ifconditional\inlinelefttoright\else\s!reverse\fi} +\setvalue{\??reverse\v!reverse}{\ifconditional\inlinelefttoright \s!reverse\fi} + +\ifcase\contextlmtxmode + \let\usedirectionparameterreverse\gobbleoneargument +\else + \def\usedirectionparameterreverse#1{\begincsname\??reverse#1\c!direction\endcsname} +\fi \protect \endinput |