oberdiek update 11/11

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

1 files changed, 63 insertions, 7 deletions

diff --git a/Master/texmf-dist/source/latex/oberdiek/setouterhbox.dtx b/Master/texmf-dist/source/latex/oberdiek/setouterhbox.dtx
index c2d4316d91b..8ad65cec1fe 100644
--- a/Master/texmf-dist/source/latex/oberdiek/setouterhbox.dtx
+++ b/Master/texmf-dist/source/latex/oberdiek/setouterhbox.dtx
@@ -78,6 +78,7 @@
 \keepsilent
 \askforoverwritefalse
 
+\let\MetaPrefix\relax
 \preamble
 
 This is a generated file.
@@ -104,6 +105,7 @@ and the derived files
    setouterhbox-test2.tex.
 
 \endpreamble
+\let\MetaPrefix\DoubleperCent
 
 \generate{%
   \file{setouterhbox.ins}{\from{setouterhbox.dtx}{install}}%
@@ -125,6 +127,10 @@ and the derived files
 \Msg{*}
 \Msg{*     setouterhbox.sty}
 \Msg{*}
+\Msg{* And install the following script file:}
+\Msg{*}
+\Msg{*     }
+\Msg{*}
 \Msg{* To produce the documentation run the file `setouterhbox.drv'}
 \Msg{* through LaTeX.}
 \Msg{*}
@@ -142,14 +148,14 @@ and the derived files
 \ProvidesFile{setouterhbox.drv}%
   [2007/09/09 v1.7 Set hbox in outer horizontal mode (HO)]%
 \documentclass{ltxdoc}
-\usepackage{holtxdoc}[2007/10/21]
+\usepackage{holtxdoc}[2007/11/11]
 \begin{document}
   \DocInput{setouterhbox.dtx}%
 \end{document}
 %</driver>
 % \fi
 %
-% \CheckSum{461}
+% \CheckSum{551}
 %
 % \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
@@ -369,6 +375,9 @@ by/a/very_long_long_long_path.html}%
       \fi
     \fi
   \else
+    \catcode35 6 % #
+    \catcode123 1 % {
+    \catcode125 2 % }
     \expandafter\ifx\csname PackageInfo\endcsname\relax
       \def\x#1#2{%
         \immediate\write-1{Package #1 Info: #2.}%
@@ -385,6 +394,7 @@ by/a/very_long_long_long_path.html}%
 %    Package identification:
 %    \begin{macrocode}
 \begingroup
+  \catcode35 6 % #
   \catcode40 12 % (
   \catcode41 12 % )
   \catcode44 12 % ,
@@ -393,6 +403,8 @@ by/a/very_long_long_long_path.html}%
   \catcode47 12 % /
   \catcode58 12 % :
   \catcode64 11 % @
+  \catcode123 1 % {
+  \catcode125 2 % }
   \expandafter\ifx\csname ProvidesPackage\endcsname\relax
     \def\x#1#2#3[#4]{\endgroup
       \immediate\write-1{Package: #3 #4}%
@@ -412,10 +424,22 @@ by/a/very_long_long_long_path.html}%
 %    \end{macrocode}
 %
 %    \begin{macrocode}
-\expandafter\edef\csname setouterhboxAtEnd\endcsname{%
-  \catcode64 \the\catcode64\relax
-}
+\begingroup
+  \catcode123 1 % {
+  \catcode125 2 % }
+  \def\x{\endgroup
+    \expandafter\edef\csname setouterhboxAtEnd\endcsname{%
+      \catcode35 \the\catcode35\relax
+      \catcode64 \the\catcode64\relax
+      \catcode123 \the\catcode123\relax
+      \catcode125 \the\catcode125\relax
+    }%
+  }%
+\x
+\catcode35 6 % #
 \catcode64 11 % @
+\catcode123 1 % {
+\catcode125 2 % }
 \def\TMP@EnsureCode#1#2{%
   \edef\setouterhboxAtEnd{%
     \setouterhboxAtEnd
@@ -726,7 +750,39 @@ E   \egroup
 %<*test1>
 %    \end{macrocode}
 %    \begin{macrocode}
+\catcode`\{=1 %
+\catcode`\}=2 %
+\catcode`\#=6 %
 \catcode`\@=11 %
+\expandafter\ifx\csname count@\endcsname\relax
+  \countdef\count@=255 %
+\fi
+\expandafter\ifx\csname @gobble\endcsname\relax
+  \long\def\@gobble#1{}%
+\fi
+\expandafter\ifx\csname @firstofone\endcsname\relax
+  \long\def\@firstofone#1{#1}%
+\fi
+\expandafter\ifx\csname loop\endcsname\relax
+  \expandafter\@firstofone
+\else
+  \expandafter\@gobble
+\fi
+{%
+  \def\loop#1\repeat{%
+    \def\body{#1}%
+    \iterate
+  }%
+  \def\iterate{%
+    \body
+      \let\next\iterate
+    \else
+      \let\next\relax
+    \fi
+    \next
+  }%
+  \let\repeat=\fi
+}%
 \def\RestoreCatcodes{}
 \count@=0 %
 \loop
@@ -735,7 +791,7 @@ E   \egroup
     \catcode\the\count@=\the\catcode\count@\relax
   }%
 \ifnum\count@<255 %
-  \advance\count@\@ne
+  \advance\count@ 1 %
 \repeat
 
 \def\RangeCatcodeInvalid#1#2{%
@@ -743,7 +799,7 @@ E   \egroup
   \loop
     \catcode\count@=15 %
   \ifnum\count@<#2\relax
-    \advance\count@\@ne
+    \advance\count@ 1 %
   \repeat
 }
 \def\Test{%