%% %% This is file `hyphsubst.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% hyphsubst.dtx (with options: `package') %% %% This is a generated file. %% %% Copyright (C) 2008 by Heiko Oberdiek %% %% This work may be distributed and/or modified under the %% conditions of the LaTeX Project Public License, either %% version 1.3 of this license or (at your option) any later %% version. The latest version of this license is in %% http://www.latex-project.org/lppl.txt %% and version 1.3 or later is part of all distributions of %% LaTeX version 2005/12/01 or later. %% %% This work has the LPPL maintenance status "maintained". %% %% This Current Maintainer of this work is Heiko Oberdiek. %% %% This work consists of the main source file hyphsubst.dtx %% and the derived files %% hyphsubst.sty, hyphsubst.pdf, hyphsubst.ins, hyphsubst.drv, %% hyphsubst-test1.tex, hyphsubst-test2.tex. %% \begingroup \catcode44 12 % , \catcode45 12 % - \catcode46 12 % . \catcode58 12 % : \catcode64 11 % @ \expandafter\let\expandafter\x\csname ver@hyphsubst.sty\endcsname \ifcase 0% \ifx\x\relax % plain \else \ifx\x\empty % LaTeX \else 1% \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.}% }% \else \def\x#1#2{\PackageInfo{#1}{#2, stopped}}% \fi \x{hyphsubst}{The package is already loaded}% \endgroup \expandafter\endinput \fi \endgroup \begingroup \catcode35 6 % # \catcode40 12 % ( \catcode41 12 % ) \catcode44 12 % , \catcode45 12 % - \catcode46 12 % . \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}% \xdef#1{#4}% }% \else \def\x#1#2[#3]{\endgroup #2[{#3}]% \ifx#1\@undefined \xdef#1{#3}% \fi \ifx#1\relax \xdef#1{#3}% \fi }% \fi \expandafter\x\csname ver@hyphsubst.sty\endcsname \ProvidesPackage{hyphsubst}% [2008/06/09 v0.2 Substitute hyphenation patterns (HO)] \begingroup \catcode123 1 % { \catcode125 2 % } \def\x{\endgroup \expandafter\edef\csname HyphSubst@AtEnd\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\HyphSubst@AtEnd{% \HyphSubst@AtEnd \catcode#1 \the\catcode#1\relax }% \catcode#1 #2\relax } \TMP@EnsureCode{39}{12}% ' \TMP@EnsureCode{46}{12}% . \TMP@EnsureCode{47}{12}% / \TMP@EnsureCode{58}{12}% : \TMP@EnsureCode{61}{12}% = \TMP@EnsureCode{96}{12}% ` \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname RequirePackage\endcsname\relax \input infwarerr.sty\relax \else \RequirePackage{infwarerr}[2007/09/09]% \fi \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname et@xlang\endcsname\relax \def\HyphSubst@l{l@}% \else \def\HyphSubst@l{lang@}% \fi \def\HyphSubstLet#1#2{% \begingroup \def\x{}% \expandafter\ifx\csname\HyphSubst@l#2\endcsname\relax \@PackageError{hyphsubst}{Unknown pattern `#2'}\@ehc \else \def\lmsg{}% \expandafter\ifx\csname\HyphSubst@l#1\endcsname\relax \edef\msg{% New: \expandafter\string\csname\HyphSubst@l#1\endcsname \noexpand\MessageBreak }% \else \edef\msg{% Redefined: \expandafter\string\csname\HyphSubst@l#1\endcsname \noexpand\MessageBreak old value: \number\csname\HyphSubst@l#1\endcsname \noexpand\MessageBreak }% \ifnum\csname\HyphSubst@l#1\endcsname=\language \edef\x{% \noexpand\language=% \number\csname\HyphSubst@l#2\endcsname\relax }% \edef\lmsg{% \noexpand\MessageBreak \string\language\noexpand\space updated% }% \fi \fi \expandafter\global\expandafter\let \csname\HyphSubst@l#1\expandafter\endcsname \csname\HyphSubst@l#2\endcsname \@PackageInfo{hyphsubst}{% \msg new value: \number\csname\HyphSubst@l#1\endcsname \lmsg }% \fi \expandafter\endgroup\x } \def\HyphSubstIfExists#1{% \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname\HyphSubst@l#1\endcsname\relax \expandafter\@secondoftwo \else \expandafter\@firstoftwo \fi } \expandafter\ifx\csname @firstoftwo\endcsname\relax \long\def\@firstoftwo#1#2{#1}% \fi \expandafter\ifx\csname @secondoftwo\endcsname\relax \long\def\@secondoftwo#1#2{#2}% \fi \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname documentclass\endcsname\relax \HyphSubst@AtEnd \expandafter\endinput \fi \DeclareOption*{% \expandafter\HyphSubst@Option\CurrentOption==\relax } \def\HyphSubst@Option#1=#2=#3\relax{% \HyphSubstLet{#1}{#2}% } \ProcessOptions*\relax \HyphSubst@AtEnd \endinput %% %% End of file `hyphsubst.sty'.