summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/oberdiek
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2008-06-09 21:15:33 +0000
committerKarl Berry <karl@freefriends.org>2008-06-09 21:15:33 +0000
commitb5ceba569f149d4151bb2e0e2b1cc5b2069a9ad4 (patch)
tree1c3e560aac8400ec7e1168e1afa570b158864b53 /Master/texmf-dist/tex/generic/oberdiek
parentecae399c7deb8665b1ec3adc021ce6a1a23f417b (diff)
oberdiek (hyphsubst) update (9jun08)
git-svn-id: svn://tug.org/texlive/trunk@8626 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/oberdiek')
-rw-r--r--Master/texmf-dist/tex/generic/oberdiek/hyphsubst.sty200
1 files changed, 200 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/oberdiek/hyphsubst.sty b/Master/texmf-dist/tex/generic/oberdiek/hyphsubst.sty
new file mode 100644
index 00000000000..4058b0a793b
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/oberdiek/hyphsubst.sty
@@ -0,0 +1,200 @@
+%%
+%% 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) 2007 by Heiko Oberdiek <oberdiek@uni-freiburg.de>
+%%
+%% 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\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'.