diff options
Diffstat (limited to 'Master/texmf-dist/tex/xelatex/polyglossia/gloss-german.ldf')
-rw-r--r-- | Master/texmf-dist/tex/xelatex/polyglossia/gloss-german.ldf | 153 |
1 files changed, 78 insertions, 75 deletions
diff --git a/Master/texmf-dist/tex/xelatex/polyglossia/gloss-german.ldf b/Master/texmf-dist/tex/xelatex/polyglossia/gloss-german.ldf index ec78057d0a5..94041f8a677 100644 --- a/Master/texmf-dist/tex/xelatex/polyglossia/gloss-german.ldf +++ b/Master/texmf-dist/tex/xelatex/polyglossia/gloss-german.ldf @@ -11,21 +11,21 @@ \ifx\@tmpa\tmp@old% \ifx\l@german\@undefined% \xpg@nopatterns{german}% - \adddialect\l@german0% + \adddialect\l@german\l@nohyphenation% \fi% \@german@oldspellingtrue% \else% \ifx\@tmpa\tmp@oldyr% \ifx\l@german\@undefined% \xpg@nopatterns{german}% - \adddialect\l@german0% + \adddialect\l@german\l@nohyphenation% \fi% \@german@oldspellingtrue% \else% \ifx\l@ngerman\@undefined% \ifx\l@german\@undefined% \xpg@nopatterns{ngerman}% - \adddialect\l@ngerman0% + \adddialect\l@ngerman\l@nohyphenation% \else% \xpg@warning{You asked for `ngerman' but only `german' hyphenation is available!}% \@german@oldspellingtrue% @@ -37,91 +37,68 @@ \fi% } +\newif\if@german@fraktur +\def\tmp@fraktur{fraktur} +\define@key{german}{script}[latin]{% + \def\@tmpa{#1}% + \ifx\@tmpa\tmp@fraktur\@german@frakturtrue\else% + \@german@frakturfalse% + \fi} + \define@boolkey{german}[german@]{latesthyphen}[false]{} \define@boolkey{german}[german@]{babelshorthands}[false]{} -\setkeys{german}{spelling,latesthyphen,babelshorthands} +\setkeys{german}{spelling,latesthyphen,babelshorthands,script} -%% definitions from babel.def and germanb.ldf -\long\def\bbl@afterelse#1\else#2\fi{\fi#1} -\long\def\bbl@afterfi#1\fi{\fi#1} -\def\textormath#1#2{% - \ifmmode - \bbl@afterelse#2% - \else - \bbl@afterfi#1% - \fi} +\ifcsundef{initiate@active@char}{% +\input{babelsh.def}% +\initiate@active@char{"}% +}{} -\def\bbl@disc#1#2{% - \nobreak\discretionary{#2-}{}{#1}} +\def\german@shorthands{% +\bbl@activate{"}% +\def\language@group{german}% +\declare@shorthand{german}{"`}{„}% +\declare@shorthand{german}{"'}{“}% +\declare@shorthand{german}{"<}{«}% +\declare@shorthand{german}{">}{»}% +\declare@shorthand{german}{"c}{\textormath{\bbl@disc@german ck}{c}}% +\declare@shorthand{german}{"C}{\textormath{\bbl@disc@german CK}{C}}% +\declare@shorthand{german}{"F}{\textormath{\bbl@disc@german F{FF}}{F}}% +\declare@shorthand{german}{"l}{\textormath{\bbl@disc@german l{ll}}{l}}% +\declare@shorthand{german}{"L}{\textormath{\bbl@disc@german L{LL}}{L}}% +\declare@shorthand{german}{"m}{\textormath{\bbl@disc@german m{mm}}{m}}% +\declare@shorthand{german}{"M}{\textormath{\bbl@disc@german M{MM}}{M}}% +\declare@shorthand{german}{"n}{\textormath{\bbl@disc@german n{nn}}{n}}% +\declare@shorthand{german}{"N}{\textormath{\bbl@disc@german N{NN}}{N}}% +\declare@shorthand{german}{"p}{\textormath{\bbl@disc@german p{pp}}{p}}% +\declare@shorthand{german}{"P}{\textormath{\bbl@disc@german P{PP}}{P}}% +\declare@shorthand{german}{"r}{\textormath{\bbl@disc@german r{rr}}{r}}% +\declare@shorthand{german}{"R}{\textormath{\bbl@disc@german R{RR}}{R}}% +\declare@shorthand{german}{"t}{\textormath{\bbl@disc@german t{tt}}{t}}% +\declare@shorthand{german}{"T}{\textormath{\bbl@disc@german T{TT}}{T}}% +\declare@shorthand{german}{"f}{\textormath{\bbl@discff}{f}}% \def\bbl@discff{\penalty\@M - \afterassignment\bbl@insertff \let\bbl@nextff= } + \afterassignment\bbl@insertff \let\bbl@nextff= }% \def\bbl@insertff{% \if f\bbl@nextff \expandafter\@firstoftwo\else\expandafter\@secondoftwo\fi - {\relax\discretionary{ff-}{f}{ff}}{f\bbl@nextff}} -\let\bbl@nextff=f - -\def\german@shorthands{% - \XeTeXinterchartokenstate=1% - \XeTeXcharclass `\" 7% - \XeTeXcharclass `\c 8% - \XeTeXcharclass `\C 9% - \XeTeXcharclass `\F 10% - \XeTeXcharclass `\l 11% - \XeTeXcharclass `\L 12% - \XeTeXcharclass `\m 13% - \XeTeXcharclass `\M 14% - \XeTeXcharclass `\n 15% - \XeTeXcharclass `\N 16% - \XeTeXcharclass `\p 17% - \XeTeXcharclass `\P 18% - \XeTeXcharclass `\r 19% - \XeTeXcharclass `\R 20% - \XeTeXcharclass `\t 21% - \XeTeXcharclass `\T 22% - \XeTeXcharclass `\f 23% - \XeTeXcharclass `\- 24% - \XeTeXcharclass `\| 25% - \XeTeXcharclass `\~ 26% - \XeTeXcharclass `\= 27% - \XeTeXcharclass `\` 28% - \XeTeXcharclass `\' 29% - \XeTeXcharclass `\< 30% - \XeTeXcharclass `\> 31% - \XeTeXinterchartoks 7 8 = {\textormath{\bbl@disc ck}{c}}% - \XeTeXinterchartoks 7 9 = {\textormath{\bbl@disc CK}{C}}% - \XeTeXinterchartoks 7 10 = {\textormath{\bbl@disc F{FF}}{F}}% - \XeTeXinterchartoks 7 11 = {\textormath{\bbl@disc l{ll}}{l}}% - \XeTeXinterchartoks 7 12 = {\textormath{\bbl@disc L{LL}}{L}}% - \XeTeXinterchartoks 7 13 = {\textormath{\bbl@disc m{mm}}{m}}% - \XeTeXinterchartoks 7 14 = {\textormath{\bbl@disc M{MM}}{M}}% - \XeTeXinterchartoks 7 15 = {\textormath{\bbl@disc n{nn}}{n}}% - \XeTeXinterchartoks 7 16 = {\textormath{\bbl@disc N{NN}}{N}}% - \XeTeXinterchartoks 7 17 = {\textormath{\bbl@disc p{pp}}{p}}% - \XeTeXinterchartoks 7 18 = {\textormath{\bbl@disc P{PP}}{P}}% - \XeTeXinterchartoks 7 19 = {\textormath{\bbl@disc r{rr}}{r}}% - \XeTeXinterchartoks 7 20 = {\textormath{\bbl@disc R{RR}}{R}}% - \XeTeXinterchartoks 7 21 = {\textormath{\bbl@disc t{tt}}{t}}% - \XeTeXinterchartoks 7 22 = {\textormath{\bbl@disc T{TT}}{T}}% - \XeTeXinterchartoks 7 23 = {\textormath{\bbl@discff}{f}}% - \XeTeXinterchartoks 7 24 = {\nobreak\-\nobreak\hskip\z@skip}% - \XeTeXinterchartoks 7 25 = {\textormath{\penalty\@M\discretionary{-}{}{\kern.03em}}{}}% - \XeTeXinterchartoks 7 7 = {\hskip\z@skip}% - \XeTeXinterchartoks 7 26 = {\textormath{\leavevmode\hbox{-}}{-}}% - \XeTeXinterchartoks 7 27 = {\penalty\@M-\hskip\z@skip}% - \XeTeXinterchartoks 7 28 = „% - \XeTeXinterchartoks 7 29 = “% - \XeTeXinterchartoks 7 30 = «% - \XeTeXinterchartoks 7 31 = »% + {\relax\discretionary{ff-}{f}{ff}\allowhyphens}{f\bbl@nextff}}% +\let\bbl@nextff=f% +\declare@shorthand{german}{"-}{\nobreak\-\nobreak\hskip\z@skip}% +\declare@shorthand{german}{"|}{\textormath{\penalty\@M\discretionary{-}{}{\kern.03em}}{}}% +\declare@shorthand{german}{""}{\hskip\z@skip}% +\declare@shorthand{german}{"~}{\textormath{\leavevmode\hbox{-}}{-}}% +\declare@shorthand{german}{"=}{\penalty\@M-\hskip\z@skip}% +\def\ck{\allowhyphens\discretionary{k-}{k}{ck}\allowhyphens}% } \def\nogerman@shorthands{% - \XeTeXinterchartokenstate=0% + \@ifundefined{initiate@active@char}{}{\bbl@deactivate{"}}% } -\def\captionsgerman{% +\def\captions@german{% \def\prefacename{Vorwort}% \def\refname{Literatur}% \def\abstractname{Zusammenfassung}% @@ -144,7 +121,7 @@ \def\proofname{Beweis}% \def\glossaryname{Glossar}% } -\def\dategerman{% +\def\date@german{% \def\today{\number\day.% \space \ifcase\month%TODO add option for Austrian forms (Jänner etc) \or Januar\or Februar\or März\or April\or Mai\or Juni\or% @@ -153,7 +130,33 @@ \space \number\year}% } -\def\german@language{\protect\language=% +%%Strings for Fraktur contributed by Gerrit <z0idberg . gmx . de> +\def\captions@german@fraktur{% + \captions@german% + \def\abstractname{Zuſammenfaſſung}% + \def\seename{ſiehe}% + \def\alsoname{ſiehe auch}% + \def\glossaryname{Gloſſar}% + } + +\def\date@german@fraktur{% + \def\today{\number\day.% + \space \ifcase\month%TODO add option for Austrian forms (Jänner etc) + \or Januar\or Februar\or März\or April\or Mai\or Juni\or% + Juli\or Auguſt\or September\or Oktober\or November\or% + Dezember\fi% + \space \number\year}% +} + +\def\captionsgerman{% + \if@german@fraktur\captions@german@fraktur\else\captions@german\fi% + } + +\def\dategerman{% + \if@german@fraktur\date@german@fraktur\else\date@german\fi% + } + +\def\german@language{\language=% \csname l@\if@german@oldspelling\else n\fi german\ifgerman@latesthyphen -x-latest\fi\endcsname} \setlocalhyphenmins{german}{2}{2}% |