From 34c48d9566089694027f919d621fec0e075d1b84 Mon Sep 17 00:00:00 2001
From: Karl Berry <karl@freefriends.org>
Date: Thu, 18 Oct 2012 22:33:43 +0000
Subject: sttools (19oct12)

git-svn-id: svn://tug.org/texlive/trunk@28013 c570f23f-e606-0410-a88d-b1316a301751
---
 Master/texmf-dist/tex/latex/sttools/midfloat.sty | 97 ++++++++++--------------
 1 file changed, 40 insertions(+), 57 deletions(-)

(limited to 'Master/texmf-dist/tex/latex/sttools/midfloat.sty')

diff --git a/Master/texmf-dist/tex/latex/sttools/midfloat.sty b/Master/texmf-dist/tex/latex/sttools/midfloat.sty
index d9d11129ee7..93f6248a549 100644
--- a/Master/texmf-dist/tex/latex/sttools/midfloat.sty
+++ b/Master/texmf-dist/tex/latex/sttools/midfloat.sty
@@ -1,72 +1,55 @@
-%% midfloat.sty
-%% Copyright 1997 Sigitas Tolu\v sis
+%%
+%% This is file `midfloat.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% midfloat.dtx  (with options: `package')
+%% 
+%% Copyright (C) 1997-2012 by Sigitas Tolu\v{s}is <sigitas@vtex.lt>
 %% VTeX Ltd., Akademijos 4, Vilnius, Lithuania
-%% e-mail sigitas@vtex.lt
 %% http://www.vtex.lt/tex/download/macros/
+%% --------------------------------------------------------------------------
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either version 1.3
+%% of this license or (at your option) any later version.
+%% The latest version of this license is in
+%%   http://www.latex-project.org/lppl.txt
+%% and version 1.3 or later is part of all distributions of LaTeX
+%% version 2005/12/01 or later.
+%%
+%% PURPOSE:   Insert some material in full-width on double-column page.
 %%
-% This program can redistributed and/or modified under the terms
-% of the LaTeX Project Public License Distributed from CTAN
-% archives in directory macros/latex/base/lppl.txt; either
-% version 1 of the License, or (at your option) any later version.
-%
-% PURPOSE:   Insert some material in full-width on double-column page.
-%
-% SHORT DESCRIPTION:
-%
-%   It is denoted to place some material (from the left column)
-%   in full-width at any place (but not at the top) on double-column 
-%   page (\twocolumn mode). Existing text remains as it was before 
-%   insert. Placement is restricted to one page. (It is some kind of
-%   dbfloat intext).
-%
-% Provides new environment:
-%
-%  \begin{strip}[#1/#2] ... \end{strip}
-%  -----------------------------
-%
-%   Puts \vbox{...} in full-width on double-column page.
-%   Parameters #1 and #2 are optional. 
-%   By default #1=0pt and #2=0pt.
-%   The material on the right column under strip is stretched down 
-%   by #1 and below strip is moved down by #2.
-%
-%   It can be problems with floats and footnotes. In the case of 
-%   problems with footnotes it is possible to correct the situation
-%   using commands \footnotemark and \footnotetext.
-%
-% \changes{1997/10/01}{some names}
-%
+\NeedsTeXFormat{LaTeX2e}[1999/12/01]
+\ProvidesPackage{midfloat}
+    [2012/05/29 v1.1 Insert some material in full-width on double-column page]
 \NeedsTeXFormat{LaTeX2e}
 \ProvidesPackage{midfloat}[1997/10/01]
-%
 \newif\if@vihproof \@vihprooftrue
-\newtoks\juo@sar \juo@sar={}
-\def\@ca#1#2#3#4{}
-\@ifundefined{stripsep}{\newskip\stripsep\stripsep 15pt}{}
-%
-\newskip\m@addvipersep
-\m@addvipersep\z@
-\newskip\c@addvipersep
-\c@addvipersep\z@
+\newtoks\juo@sar   \juo@sar={}
+\@ifundefined{stripsep}{\newskip\stripsep \stripsep 15\p@}{}
+\newskip\m@addvipersep \m@addvipersep\z@
+\newskip\c@addvipersep \c@addvipersep\z@
 \newdimen\ht@strip
 \newdimen\right@cor
-\newdimen\cor@height \cor@height=0pt
+\newdimen\cor@height \cor@height=\z@
 \newdimen\juo@pr
 \newdimen\juo@ht
-\newbox\@viper
-\newcount\juo@sk
 \newdimen\c@colht
+\newbox\@viper
 \newbox\@rightcolumn
-
-\def\add@strip#1#2#3#4{\begingroup%
-  \xdef\ex@{\global\noexpand\juo@sar{\the\juo@sar\noexpand\@ca{#1}{#2}{#3}{#4}}}\ex@%
-\endgroup}
-
+\newcount\juo@sk
+\def\@ca#1#2#3#4{}
+\def\add@strip#1#2#3#4{%
+  \begingroup
+    \xdef\ex@{\global\noexpand\juo@sar{\the\juo@sar\noexpand\@ca{#1}{#2}{#3}{#4}}}%
+    \ex@
+  \endgroup
+  }
 \def\remove@strip#1{\ifx#1\@empty\global\juo@sk=0\else
    \global\advance\juo@sk by-1\expandafter\next@item\the #1\@@#1\fi}
 \def\next@item \@ca #1#2#3#4#5\@@#6{\global #6={#5}\global\juo@pr=#1\global\juo@ht=#2%
 \global\cor@height=#3\global\m@addvipersep=#4}
-
 \def\strip{\@ifnextsymb[{\@strip}{\@strip[0pt/0pt]}}
 \def\@strip[#1/#2]{\global\@tempdima=#1\global\@tempdimb=#2%
   \global \setbox\@viper\vbox\bgroup%
@@ -148,7 +131,7 @@
                 \global\advance\@colht by -\ht\@rightcolumn
                 \global\advance\@colht by\cor@height
                 \global\cor@height=0pt
-            \else                             
+            \else
                 \global\advance\c@colht by-\ht\@rightcolumn
                 \global\@colht\c@colht
             \fi
@@ -184,7 +167,6 @@
     \fi
   \fi
 }
-
 \def \@cflt{%
     \let \@elt \@comflelt
     \setbox\@tempboxa \vbox{}%
@@ -206,7 +188,6 @@
     \xdef\@freelist{\@freelist\@toplist}%
     \global\let\@toplist\@empty
 }
-
 \def\@ifnextsymb#1#2#3{%
   \let\reserved@d=#1%
   \def\reserved@a{#2}\def\reserved@b{#3}%
@@ -222,5 +203,7 @@
     \fi
   \fi
   \reserved@c}
-
+%%
 \endinput
+%%
+%% End of file `midfloat.sty'.
-- 
cgit v1.2.3

