summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/xelatex/polyglossia/gloss-german.ldf
blob: ec78057d0a52532da88c219e54f44937d789079e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
\ProvidesFile{gloss-german.ldf}[polyglossia: module for german]
\makeatletter
\def\german@font{\normalfontlatin}

\def\tmp@old{old}
\def\tmp@oldyr{1901}
\newif\if@german@oldspelling
\@german@oldspellingfalse
\define@key{german}{spelling}[new]{%
   \def\@tmpa{#1}%
   \ifx\@tmpa\tmp@old%
	\ifx\l@german\@undefined%
	   \xpg@nopatterns{german}%
	   \adddialect\l@german0%
	\fi%
        \@german@oldspellingtrue%
   \else%
     \ifx\@tmpa\tmp@oldyr%
        \ifx\l@german\@undefined%
	   \xpg@nopatterns{german}%
	   \adddialect\l@german0%
        \fi%
        \@german@oldspellingtrue%
     \else%
	\ifx\l@ngerman\@undefined%
	    \ifx\l@german\@undefined%
	      \xpg@nopatterns{ngerman}%
	      \adddialect\l@ngerman0%
	    \else%
	      \xpg@warning{You asked for `ngerman' but only `german' hyphenation is available!}%
              \@german@oldspellingtrue%
	    \fi%
	\else%
            \@german@oldspellingfalse
	\fi%
      \fi%
   \fi%
}

\define@boolkey{german}[german@]{latesthyphen}[false]{}

\define@boolkey{german}[german@]{babelshorthands}[false]{}

\setkeys{german}{spelling,latesthyphen,babelshorthands}

%% 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}

\def\bbl@disc#1#2{%
  \nobreak\discretionary{#2-}{}{#1}}
\def\bbl@discff{\penalty\@M
  \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 = »%
    }

\def\nogerman@shorthands{%
    \XeTeXinterchartokenstate=0%
}

\def\captionsgerman{%
   \def\prefacename{Vorwort}%
   \def\refname{Literatur}%
   \def\abstractname{Zusammenfassung}%
   \def\bibname{Literaturverzeichnis}%
   \def\chaptername{Kapitel}%
   \def\appendixname{Anhang}%
   \def\contentsname{Inhaltsverzeichnis}%
   \def\listfigurename{Abbildungsverzeichnis}%
   \def\listtablename{Tabellenverzeichnis}%
   \def\indexname{Index}%
   \def\figurename{Abbildung}%
   \def\tablename{Tabelle}%
   \def\partname{Teil}%
   \def\enclname{Anlage(n)}%
   \def\ccname{Verteiler}%
   \def\headtoname{An}%
   \def\pagename{Seite}%
   \def\seename{siehe}%
   \def\alsoname{siehe auch}%
   \def\proofname{Beweis}%
   \def\glossaryname{Glossar}%
}
\def\dategerman{%   
   \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 August\or September\or Oktober\or November\or%
      Dezember\fi%
      \space \number\year}%
}

\def\german@language{\protect\language=%
  \csname l@\if@german@oldspelling\else n\fi german\ifgerman@latesthyphen -x-latest\fi\endcsname}

\setlocalhyphenmins{german}{2}{2}%

\def\noextras@german{%
   \nonfrenchspacing%
   \nogerman@shorthands%
}

\def\blockextras@german{%
   \frenchspacing%
   \ifgerman@babelshorthands\german@shorthands\fi%
}

\def\inlineextras@german{%
   \frenchspacing%
   \ifgerman@babelshorthands\german@shorthands\fi%
}

\endinput