summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/xelatex/polyglossia/gloss-german.ldf
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/xelatex/polyglossia/gloss-german.ldf')
-rw-r--r--Master/texmf-dist/tex/xelatex/polyglossia/gloss-german.ldf153
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}%