extract (17sep19)

git-svn-id: svn://tug.org/texlive/trunk@52109 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 23 insertions, 6 deletions

diff --git a/Master/texmf-dist/source/latex/extract/extract.dtx b/Master/texmf-dist/source/latex/extract/extract.dtx
index b4b74776bef..42aa96f4c5b 100644
--- a/Master/texmf-dist/source/latex/extract/extract.dtx
+++ b/Master/texmf-dist/source/latex/extract/extract.dtx
@@ -109,7 +109,7 @@ of the package.
 %
 % \GetFileInfo{extract.sty}
 %
-% \CheckSum{1013}
+% \CheckSum{1011}
 %
 % \DoNotIndex{\@backslashchar,\@bsphack,\@checkend,\@currenvir,
 % \@currenvline,\@doendpe,\@eha,\@ehc,\@empty,\@endpefalse,\@esphack,
@@ -152,7 +152,7 @@ of the package.
 %\texttt{/macros/latex/contrib/extract}. See \texttt{extract.dtx} for
 %information on installing \pf{extract} into your \LaTeX\
 %distribution and for the license of this package.}}
-%\author{Hendri Adriaens\\\url{http://stuwww.uvt.nl/~hendri}}
+%\author{\mktitledecor Hendri Adriaens}
 %\date{\fileversion\ (\filedate)}
 %\maketitle
 %
@@ -920,7 +920,7 @@ of the package.
 %<*extract>
 \NeedsTeXFormat{LaTeX2e}[1995/12/01]
 \ProvidesPackage{extract}
-  [2005/05/07 v1.8 extract content from document (HA)]
+  [2019/09/17 v1.9 extract content from document (HA)]
 \RequirePackage{verbatim}
 \RequirePackage{xkeyval}
 \newwrite\XTR@out
@@ -1086,11 +1086,12 @@ of the package.
 % \end{macro}
 % \begin{macro}{\begin}
 % \marg{environment}\\
+% \changes{v1.9}{2019/09/17}{Changed definition to robust version}
 % Modify the macro |\begin| to allow adding code to a level specific
 % hook which can be executed after |\endgroup| in |\end|. See for
 % more info on this macro the \LaTeX\ source~\cite{LaTeXbase}.
 %    \begin{macrocode}
-\def\begin#1{%
+\@namedef{begin}#1{%
   \@ifundefined{#1}%
     {\def\reserved@a{\@latex@error{Environment #1 undefined}\@eha}}%
     {\def\reserved@a{\def\@currenvir{#1}%
@@ -1111,9 +1112,10 @@ of the package.
 % \end{macro}
 % \begin{macro}{\end}
 % \marg{environment}\\
+% \changes{v1.9}{2019/09/17}{Changed definition to robust version}
 % Modify |\end| to execute the code collected in the hook.
 %    \begin{macrocode}
-\def\end#1{%
+\@namedef{end}#1{%
   \csname end#1\endcsname\@checkend{#1}%
   \expandafter\endgroup\if@endpe\@doendpe\fi
 %    \end{macrocode}
@@ -1130,7 +1132,7 @@ of the package.
 % decreasing the depth as to avoid level mixing problems when the
 % hook contains another environment. This environment has to be
 % executed at the same level as the environment in which the hook was
-% defined since it is executed after the group and does not below
+% defined since it is executed after the group and does not belong
 % anymore to the environment in which the hook was defined.
 %    \begin{macrocode}
   \reserved@a\relax
@@ -2109,6 +2111,7 @@ c\end{extractskip}d
 \usepackage{xcolor}
 \usepackage{fourier}
 \usepackage{varioref}
+\usepackage{pst-text}
 \def\reftextafter{on page~\thevpagerefnum}
 \def\reftextbefore{on page~\thevpagerefnum}
 \def\reftextfaceafter{on page~\thevpagerefnum}
@@ -2121,6 +2124,20 @@ c\end{extractskip}d
   \lstset{basicstyle=\footnotesize\ttfamily,columns=flexible,frame=single,%
     backgroundcolor=\color{yellow!20},xleftmargin=\fboxsep,%
     xrightmargin=\fboxsep,gobble=1}}{}
+\def\mktitledecor{%
+  \rput[tl]{90}(-6.5,-22.56){%
+    \psline[linewidth=1pt](0,1.5)(\paperheight,1.5)%
+    \rput[lB](.075\paperheight,.5){\pscharpath[linecolor=blue!50,%
+      fillcolor=yellow!20,fillstyle=solid,linewidth=.5pt]%
+      {\Huge\bfseries\sffamily extract}%
+    }%
+    \rput[rB](.925\paperheight,.5){\pscharpath[linecolor=blue!50,%
+      fillcolor=yellow!20,fillstyle=solid,linewidth=.5pt]%
+      {\Huge\bfseries Documentation}%
+    }%
+    \psline[linewidth=1pt](0,0)(\paperheight,0)%
+  }%
+}
 \usepackage{float}
 \newfloat{Listing}{htb}{loe}
 \makeatletter