From: Mark Wooding <mdw@distorted.org.uk>
Date: Tue, 15 May 2007 10:26:51 +0000 (+0100)
Subject: mdwtab: Add optional alignment argument to subsplit environment.
X-Git-Tag: 1.8.0~17
X-Git-Url: https://git.distorted.org.uk/~mdw/mdwtools/commitdiff_plain/c728af0b0c079339cb5fd3ea3b7d176bcb852ee2

mdwtab: Add optional alignment argument to subsplit environment.
---

diff --git a/mdwtab.dtx b/mdwtab.dtx
index 6022fea..ee11ce6 100644
--- a/mdwtab.dtx
+++ b/mdwtab.dtx
@@ -44,7 +44,7 @@
 %<+color>                [2003/08/24 1.10 Fix for people who can't spell]
 % \end{meta-comment}
 %
-% \CheckSum{3373}
+% \CheckSum{3391}
 %% \CharacterTable
 %%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
 %%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
@@ -5577,9 +5577,13 @@
 % we need to remove them by hand at the extremities of the environment.
 %
 %    \begin{macrocode}
-\def\subsplit{%
+\def\subsplit{\@ifnextchar[\subsplit@i{\subsplit@i[c]}}
+\def\subsplit@i[#1]{%
+  \let\@tempa\vcenter%
+  \if#1t\let\@tempa\vtop\fi%
+  \if#1b\let\@tempa\vbox\fi%
   \let\\\seq@cr%
-  \vcenter\bgroup%
+  \@tempa\bgroup%
   \seq@dosplit{\hfil\qquad$##$\qquad\hfil}{\hfilneg\hskip-2em}%
 }
 %    \end{macrocode}