diff options
author | Karl Berry <karl@freefriends.org> | 2008-06-09 21:15:33 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2008-06-09 21:15:33 +0000 |
commit | b5ceba569f149d4151bb2e0e2b1cc5b2069a9ad4 (patch) | |
tree | 1c3e560aac8400ec7e1168e1afa570b158864b53 /Master/texmf-dist/tex/generic/oberdiek | |
parent | ecae399c7deb8665b1ec3adc021ce6a1a23f417b (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.sty | 200 |
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'. |