summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/latex/oberdiek/telprint.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/source/latex/oberdiek/telprint.dtx')
-rw-r--r--Master/texmf-dist/source/latex/oberdiek/telprint.dtx129
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