summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/metapost/mpman-ru/ctabbing.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/metapost/mpman-ru/ctabbing.sty')
-rw-r--r--Master/texmf-dist/doc/metapost/mpman-ru/ctabbing.sty18
1 files changed, 18 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/metapost/mpman-ru/ctabbing.sty b/Master/texmf-dist/doc/metapost/mpman-ru/ctabbing.sty
new file mode 100644
index 00000000000..b61ec6ed784
--- /dev/null
+++ b/Master/texmf-dist/doc/metapost/mpman-ru/ctabbing.sty
@@ -0,0 +1,18 @@
+% Public domain.
+%
+% The ctabbing environment is a centered tabbing environment suitable for
+% displaying program fragments. The vertical spacing is exactly like that
+% for normal text in a center environment. This is achieved by setting
+% \@minipagetrue to fool \tabbing into thinking that it starts a minipage
+% and should therefore avoid all vertical space at the top. (Note that any
+% space at all would defeat the \vtop command in \ctabbing.) The
+% \vskip-\lastskip and \prevdepth saving commands avoid extra space after
+% \endtabbing
+
+\newdimen\ct@pd
+
+\def\ctabbing{\center\leavevmode\vtop\bgroup\@minipagetrue\begingroup\tabbing}
+
+\def\endctabbing{\endtabbing\endgroup\vskip-\lastskip
+ \global\ct@pd\prevdepth \egroup
+ \endcenter \global\prevdepth\ct@pd}