diff options
author | Karl Berry <karl@freefriends.org> | 2007-09-16 00:07:34 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2007-09-16 00:07:34 +0000 |
commit | d85f248e3b38ea0ecda38c5340e3cadd08d65346 (patch) | |
tree | 52e17f32b395006895b3917bc7729c7ac1514ae3 /Master/texmf-dist/source/latex/oberdiek/telprint.dtx | |
parent | 2389552f283181e0d8c610037712ade989112da3 (diff) |
oberdiek update (14sep07)
git-svn-id: svn://tug.org/texlive/trunk@4947 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/latex/oberdiek/telprint.dtx')
-rw-r--r-- | Master/texmf-dist/source/latex/oberdiek/telprint.dtx | 129 |
1 files changed, 113 insertions, 16 deletions
diff --git a/Master/texmf-dist/source/latex/oberdiek/telprint.dtx b/Master/texmf-dist/source/latex/oberdiek/telprint.dtx index c336c8e5e25..12c7b3a636a 100644 --- a/Master/texmf-dist/source/latex/oberdiek/telprint.dtx +++ b/Master/texmf-dist/source/latex/oberdiek/telprint.dtx @@ -17,7 +17,8 @@ % % This work consists of the main source file telprint.dtx % and the derived files -% telprint.sty, telprint.pdf, telprint.ins, telprint.drv. +% telprint.sty, telprint.pdf, telprint.ins, telprint.drv, +% telprint-test1.tex. % % Distribution: % CTAN:macros/latex/contrib/oberdiek/telprint.dtx @@ -51,8 +52,9 @@ % % Installation: % TDS:tex/generic/oberdiek/telprint.sty -% TDS:doc/generic/oberdiek/telprint.pdf -% TDS:source/generic/oberdiek/telprint.dtx +% TDS:doc/latex/oberdiek/telprint.pdf +% TDS:doc/latex/oberdiek/telprint-test1.tex +% TDS:source/latex/oberdiek/telprint.dtx % %<*ignore> \begingroup @@ -67,7 +69,7 @@ \input docstrip.tex \Msg{************************************************************************} \Msg{* Installation} -\Msg{* Package: telprint 2007/04/11 v1.8 Formatting of German phone numbers (HO)} +\Msg{* Package: telprint 2007/09/09 v1.9 Formatting of German phone numbers (HO)} \Msg{************************************************************************} \keepsilent @@ -94,7 +96,8 @@ This Current Maintainer of this work is Heiko Oberdiek. This work consists of the main source file telprint.dtx and the derived files - telprint.sty, telprint.pdf, telprint.ins, telprint.drv. + telprint.sty, telprint.pdf, telprint.ins, telprint.drv, + telprint-test1.tex. \endpreamble @@ -103,6 +106,8 @@ and the derived files \file{telprint.drv}{\from{telprint.dtx}{driver}}% \usedir{tex/generic/oberdiek}% \file{telprint.sty}{\from{telprint.dtx}{package}}% + \usedir{doc/latex/oberdiek}% + \file{telprint-test1.tex}{\from{telprint.dtx}{test1}}% } \obeyspaces @@ -128,7 +133,7 @@ and the derived files %<*driver> \NeedsTeXFormat{LaTeX2e} \ProvidesFile{telprint.drv}% - [2007/04/11 v1.8 Formatting of German phone numbers (HO)]% + [2007/09/09 v1.9 Formatting of German phone numbers (HO)]% \documentclass{ltxdoc} \usepackage{holtxdoc} \usepackage[ngerman,english]{babel} @@ -138,7 +143,7 @@ and the derived files %</driver> % \fi % -% \CheckSum{328} +% \CheckSum{422} % % \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 @@ -159,7 +164,7 @@ and the derived files % \GetFileInfo{telprint.drv} % % \title{The \xpackage{telprint} package} -% \date{2007/04/11 v1.8} +% \date{2007/09/09 v1.9} % \author{Heiko Oberdiek\\\xemail{oberdiek@uni-freiburg.de}} % % \maketitle @@ -225,6 +230,7 @@ and the derived files % \subsection{Documentation in German} % % \begin{otherlanguage*}{ngerman} +% \hyphenation{To-ken-ma-kros} % \begin{itemize} % \item \DescribeMacro\telprint |telprint#1|\\ % Der eigentliche Anwenderbefehl zur formatierten Ausgabe von @@ -363,20 +369,44 @@ and the derived files \fi \expandafter\x\csname ver@telprint.sty\endcsname \ProvidesPackage{telprint}% - [2007/04/11 v1.8 Formatting of German phone numbers (HO)] + [2007/09/09 v1.9 Formatting of German phone numbers (HO)] % \end{macrocode} % +% \subsection{Catcodes} +% % \begin{macrocode} -\ifx\telprint\UnDeFiNeD -% \fi in derselben Zeile wie \endinput oder \expandafter verwenden! -\else\endinput\fi +\expandafter\edef\csname TELAtEnd\endcsname{% + \catcode64 \the\catcode64\relax +} +\catcode64 11 % @ +\def\TMP@EnsureCode#1#2{% + \edef\TELAtEnd{% + \TELAtEnd + \catcode#1 \the\catcode#1\relax + }% + \catcode#1 #2\relax +} +\TMP@EnsureCode{33}{12}% ! +\TMP@EnsureCode{36}{3}% $ +\TMP@EnsureCode{40}{12}% ( +\TMP@EnsureCode{41}{12}% ) +\TMP@EnsureCode{42}{12}% * +\TMP@EnsureCode{43}{12}% + +\TMP@EnsureCode{44}{12}% , +\TMP@EnsureCode{45}{12}% - +\TMP@EnsureCode{46}{12}% . +\TMP@EnsureCode{47}{12}% / +\TMP@EnsureCode{61}{12}% = +\TMP@EnsureCode{126}{13}% ~ (active) % \end{macrocode} +% +% \subsection{Package macros} % \begin{macrocode} \ifx\DeclareRobustCommand\UnDeFiNeD \def\DeclareRobustCommand*#1[1]{\def#1##1}% \def\TELreset{\let\DeclareRobustCommand=\UnDeFiNeD}% - \immediate\write-1{% - Package `telprint' warning: % + \input infwarerr.sty\relax + \@PackageInfo{telprint}{% Macros are not robust!% }% \else @@ -522,6 +552,66 @@ and the derived files % \begin{macrocode} \TELreset\let\TELreset=\UnDeFiNeD % \end{macrocode} +% +% \begin{macrocode} +\TELAtEnd +%</package> +% \end{macrocode} +% +% \section{Test} +% +% \subsection{Catcode checks for loading} +% +% \begin{macrocode} +%<*test1> +% \end{macrocode} +% \begin{macrocode} +\catcode`\@=11 % +\def\RestoreCatcodes{} +\count@=0 % +\loop + \edef\RestoreCatcodes{% + \RestoreCatcodes + \catcode\the\count@=\the\catcode\count@\relax + }% +\ifnum\count@<255 % + \advance\count@\@ne +\repeat + +\def\RangeCatcodeInvalid#1#2{% + \count@=#1\relax + \loop + \catcode\count@=15 % + \ifnum\count@<#2\relax + \advance\count@\@ne + \repeat +} +\def\Test{% + \RangeCatcodeInvalid{0}{47}% + \RangeCatcodeInvalid{58}{64}% + \RangeCatcodeInvalid{91}{96}% + \RangeCatcodeInvalid{123}{255}% + \catcode`\@=12 % + \catcode`\\=0 % + \catcode`\{=1 % + \catcode`\}=2 % + \catcode`\#=6 % + \catcode`\[=12 % + \catcode`\]=12 % + \catcode`\%=14 % + \catcode`\ =10 % + \catcode13=5 % + \input telprint.sty\relax + \RestoreCatcodes +} +\Test +\csname @@end\endcsname +\end +% \end{macrocode} +% \begin{macrocode} +%</test1> +% \end{macrocode} +% % \section{Installation} % % \subsection{Download} @@ -582,8 +672,9 @@ and the derived files % \def\t{^^A % \begin{tabular}{@{}>{\ttfamily}l@{ $\rightarrow$ }>{\ttfamily}l@{}} % telprint.sty & tex/generic/oberdiek/telprint.sty\\ -% telprint.pdf & doc/generic/oberdiek/telprint.pdf\\ -% telprint.dtx & source/generic/oberdiek/telprint.dtx\\ +% telprint.pdf & doc/latex/oberdiek/telprint.pdf\\ +% telprint-test1.tex & doc/latex/oberdiek/telprint-test1.tex\\ +% telprint.dtx & source/latex/oberdiek/telprint.dtx\\ % \end{tabular}^^A % }^^A % \sbox0{\t}^^A @@ -752,6 +843,12 @@ and the derived files % \item % Line ends sanitized. % \end{Version} +% \begin{Version}{2007/09/09 v1.9} +% \item +% Catcode section added. +% \item +% Missing docstrip tag added. +% \end{Version} % \end{History} % % \PrintIndex |