summaryrefslogtreecommitdiff
path: root/tex/context/base/spac-ali.mkiv
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/spac-ali.mkiv')
-rw-r--r--tex/context/base/spac-ali.mkiv14
1 files changed, 12 insertions, 2 deletions
diff --git a/tex/context/base/spac-ali.mkiv b/tex/context/base/spac-ali.mkiv
index 100e3ab82..c0a503d85 100644
--- a/tex/context/base/spac-ali.mkiv
+++ b/tex/context/base/spac-ali.mkiv
@@ -817,7 +817,7 @@
\dontleavehmode % added in marrakesch at TUG 2006\begingroup
\begingroup
\setlocalhsize % new
- \def\\{\endgroup\par\doalignline{#1}{#2}\begingroup}%
+ \def\\{\egroup\par\doalignline{#1}{#2}\bgroup}%
\dowithnextbox
{\hbox to \localhsize
{\ifcase\alignstrutmode\or\strut\fi
@@ -841,6 +841,16 @@
\unexpanded\def\rightaligned{\doalignline\hss \relax}
\unexpanded\def\maxaligned {\doalignline\relax \relax}
+\unexpanded\def\startleftaligned {\doalignline\relax \hss \bgroup\ignorespaces}
+\unexpanded\def\startmidaligned {\doalignline\hss \hss \bgroup\ignorespaces}
+\unexpanded\def\startrightaligned{\doalignline\hss \relax\bgroup\ignorespaces}
+\unexpanded\def\startmaxaligned {\doalignline\relax \relax\bgroup\ignorespaces}
+
+\unexpanded\def\stopleftaligned {\removeunwantedspaces\egroup}
+\unexpanded\def\stopmidaligned {\removeunwantedspaces\egroup}
+\unexpanded\def\stoprightaligned{\removeunwantedspaces\egroup}
+\unexpanded\def\stopmaxaligned {\removeunwantedspaces\egroup}
+
\let\centeraligned\midaligned
\installcorenamespace{alignline}
@@ -863,7 +873,7 @@
\dontleavehmode % added in marrakesch at TUG 2006\begingroup
\begingroup
\setlocalhsize
- \def\\{\endgroup\par\doxalignline#1#2#3#4#5#6\begingroup}% inefficient
+ \def\\{\egroup\par\doxalignline#1#2#3#4#5#6\bgroup}% inefficient
\dowithnextbox
{\hbox to \localhsize
{#1\hskip\ifdone#2\else#3\fi#4%