diff options
Diffstat (limited to 'Master/texmf-dist/source/latex/oberdiek/iflang.dtx')
| -rw-r--r-- | Master/texmf-dist/source/latex/oberdiek/iflang.dtx | 108 |
1 files changed, 37 insertions, 71 deletions
diff --git a/Master/texmf-dist/source/latex/oberdiek/iflang.dtx b/Master/texmf-dist/source/latex/oberdiek/iflang.dtx index d946a52587c..8762ad48fba 100644 --- a/Master/texmf-dist/source/latex/oberdiek/iflang.dtx +++ b/Master/texmf-dist/source/latex/oberdiek/iflang.dtx @@ -70,7 +70,7 @@ \input docstrip.tex \Msg{************************************************************************} \Msg{* Installation} -\Msg{* Package: iflang 2007/04/12 v1.2 Language checks (HO)} +\Msg{* Package: iflang 2007/04/26 v1.3 Language checks (HO)} \Msg{************************************************************************} \keepsilent @@ -135,7 +135,7 @@ and the derived files %<*driver> \NeedsTeXFormat{LaTeX2e} \ProvidesFile{iflang.drv}% - [2007/04/12 v1.2 Language checks (HO)]% + [2007/04/26 v1.3 Language checks (HO)]% \documentclass{ltxdoc} \usepackage{holtxdoc} \begin{document} @@ -144,7 +144,7 @@ and the derived files %</driver> % \fi % -% \CheckSum{676} +% \CheckSum{605} % % \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 @@ -165,7 +165,7 @@ and the derived files % \GetFileInfo{iflang.drv} % % \title{The \xpackage{iflang} package} -% \date{2007/04/12 v1.2} +% \date{2007/04/26 v1.3} % \author{Heiko Oberdiek\\\xemail{oberdiek@uni-freiburg.de}} % % \maketitle @@ -262,6 +262,11 @@ and the derived files % Reload check, especially if the package is not used with \LaTeX. % \begin{macrocode} \begingroup + \catcode44 12 % , + \catcode45 12 % - + \catcode46 12 % . + \catcode58 12 % : + \catcode64 11 % @ \expandafter\let\expandafter\x\csname ver@iflang.sty\endcsname \ifcase 0% \ifx\x\relax % plain @@ -288,6 +293,11 @@ and the derived files % Package identification: % \begin{macrocode} \begingroup + \catcode44 12 % , + \catcode45 12 % - + \catcode46 12 % . + \catcode58 12 % : + \catcode64 11 % @ \expandafter\ifx\csname ProvidesPackage\endcsname\relax \def\x#1#2#3[#4]{\endgroup \immediate\write-1{Package: #3 #4}% @@ -303,7 +313,7 @@ and the derived files \fi \expandafter\x\csname ver@iflang.sty\endcsname \ProvidesPackage{iflang}% - [2007/04/12 v1.2 Language checks (HO)] + [2007/04/26 v1.3 Language checks (HO)] % \end{macrocode} % % \begin{macrocode} @@ -383,68 +393,12 @@ and the derived files % \subsubsection{Macros for messages} % % \begin{macrocode} -\begingroup -\ifnum\expandafter\ifx\csname PackageInfo\endcsname\relax - 1% - \fi - \expandafter\ifx\csname PackageWarningNoLine\endcsname\relax - 1% - \fi - 0=0 % - \endgroup - \expandafter\@secondoftwo +\begingroup\expandafter\expandafter\expandafter\endgroup +\expandafter\ifx\csname RequirePackage\endcsname\relax + \input infwarerr.sty\relax \else - \endgroup - \expandafter\@firstoftwo + \RequirePackage{infwarerr}% \fi -{% - \def\IfLang@GenericMessage#1#2#3{% - \begingroup - \newlinechar=10 % - \def\@spaces{\space\space\space\space}% - \ifcase#1 % - \def\MessageBreak{% - ^^J(iflang) \@spaces\@spaces\@spaces\@spaces - }% - \or - \def\MessageBreak{% - ^^J(iflang)\@spaces\@spaces\@spaces\@spaces - }% - \or - \def\MessageBreak{% - ^^J(iflang) \space\@spaces\@spaces\@spaces - }% - \fi - \expandafter\ifx\csname if#3\expandafter\endcsname - \csname iftrue\endcsname - \def\on@line{ on input line \the\inputlineno}% - \else - \def\on@line{}% - \fi - \immediate\write\ifcase#1 -1\or 16\fi{% - ^^JPackage iflang % - \ifcase#1 Info\or Warning\or Error\fi - : #2\on@line.^^J% - }% - \endgroup - }% - \def\IfLang@Info#1{% - \IfLang@GenericMessage{0}{#1}{false}% - }% - \def\IfLang@Warning#1{% - \IfLang@GenericMessage{1}{#1}{false}% - }% -}{% - \def\IfLang@Info#1{% - \begingroup - \def\on@line{}% - \PackageInfo{iflang}{#1}% - \endgroup - }% - \def\IfLang@Warning#1{% - \PackageWarningNoLine{iflang}{#1}% - }% -} % \end{macrocode} % % \subsubsection{Support for \xfile{etex.src}} @@ -453,10 +407,14 @@ and the derived files % \begin{macrocode} \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname uselanguage\endcsname\relax - \IfLang@Info{Naming convention for patterns: babel}% + \@PackageInfoNoLine{iflang}{% + Naming convention for patterns: babel% + }% \def\IfLang@prefix{l@}% \else - \IfLang@Info{Naming convention for patterns: etex.src}% + \@PackageInfoNoLine{iflang}{% + Naming convention for patterns: etex.src% + }% \def\IfLang@prefix{lang@}% \let\IfLang@OrgUseLanguage\uselanguage \def\uselanguage#1{% @@ -477,12 +435,14 @@ and the derived files \expandafter\ifx\csname languagename\endcsname\relax \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname lang@USenglish\endcsname\relax - \IfLang@Warning{\string\lang@USenglish\space is missing}% + \@PackageWarningNoLine{iflang}{% + \string\lang@USenglish\space is missing% + }% \else \ifnum\lang@USenglish=\language \def\languagename{USenglish}% \else - \IfLang@Warning{% + \@PackageWarningNoLine{iflang}{% \string\languagename\space is not set,\MessageBreak current language is unknown% }% @@ -492,7 +452,9 @@ and the derived files \fi \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname languagename\endcsname\relax - \IfLang@Info{\string\languagename\space is not set}% + \@PackageInfoNoLine{iflang}{% + \string\languagename\space is not set% + }% \fi % \end{macrocode} % @@ -611,7 +573,7 @@ and the derived files \expandafter\ifx\csname languagename\endcsname\relax \else \IfLanguagePatterns{\languagename}{}{% - \IfLang@Warning{% + \@PackageWarningNoLine{iflang}{% Mismatch between \string\language\space (patterns)\MessageBreak and setting of \string\languagename @@ -945,6 +907,10 @@ and the derived files % \item % Documentation improved. % \end{Version} +% \begin{Version}{2007/04/26 v1.3} +% \item +% Use of package \xpackage{infwarerr}. +% \end{Version} % \end{History} % % \PrintIndex |