summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/xelatex/polyglossia/gloss-french.ldf
blob: 9a03f06af7dffff6255417e64388f68259978466 (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
\ProvidesFile{gloss-french.ldf}[polyglossia: module for french]
\makeatletter
\def\french@font{\normalfontlatin}

\ifx\l@french\@undefined%
   \xpg@nopatterns{French}%
   \adddialect\l@french\l@nohyphenation%
\fi

\newXeTeXintercharclass\french@punctthin % ! ? ;
\newXeTeXintercharclass\french@punctthick % :
\newXeTeXintercharclass\french@punctguill % « »

\def\french@punctthinspace{\unskip\thinspace}
\def\french@punctthickspace{\unskip\nobreakspace}

\def\french@punctuation{%
    \frenchspacing
    \lccode"2019="2019
    \XeTeXinterchartokenstate=1
    \XeTeXcharclass `\! \french@punctthin
    \XeTeXcharclass `\? \french@punctthin
    \XeTeXcharclass `\; \french@punctthin
    \XeTeXcharclass `\: \french@punctthick
    \XeTeXinterchartoks \z@ \french@punctthin = \french@punctthinspace
    \XeTeXinterchartoks \z@ \french@punctthick = \french@punctthickspace
    }

\def\nofrench@punctuation{%
    \nonfrenchspacing
    \lccode"2019=\z@
    \XeTeXinterchartokenstate=0
}

\def\french@guillemets{%
    \XeTeXinterchartokenstate=1
    \XeTeXcharclass `\« \french@punctguill
    \XeTeXcharclass `\» \french@punctguill
    \XeTeXinterchartoks \french@punctguill \z@ = \french@punctthickspace
    \XeTeXinterchartoks \z@ \french@punctguill = \french@punctthickspace
    \XeTeXinterchartoks \french@punctguill \french@punctthin = \french@punctthinspace
        % "»;" -> "» ;"
    \XeTeXinterchartoks \french@punctguill \french@punctthick = \french@punctthickspace
        % "»:" -> "» :"
    \XeTeXinterchartoks \french@punctthin \french@punctguill  = \french@punctthickspace
        % "?»" -> "? »"
}

\def\captionsfrench{%
   \def\refname{Références}%
   \def\abstractname{Résumé}%
   \def\bibname{Bibliographie}%
   \def\prefacename{Préface}%
   \def\chaptername{Chapitre}%
   \def\appendixname{Annexe}%
   \def\contentsname{Table des matières}%
   \def\listfigurename{Table des figures}%
   \def\listtablename{Liste des tableaux}%
   \def\indexname{Index}%
   \def\figurename{\scshape Fig.}%
   \def\tablename{\scshape Tab.}%
   \def\@Fpt{\ifcase\value{part}\or Première\or Deuxième\or%
   Troisième\or Quatrième\or Cinquième\or Sixième\or%
   Septième\or Huitième\or Neuvième\or Dixième\or Onzième\or%
   Douzième\or Treizième\or Quatorzième\or Quinzième\or%
   Seizième\or Dix-septième\or Dix-huitième\or Dix-neuvième\or%
   Vingtième\fi\space}%
   \def\thepart{}%
   \def\partname{\protect\@Fpt partie}%
   \def\pagename{page}%
   \def\seename{\emph{voir}}%
   \def\alsoname{\emph{voir aussi}}%
   \def\enclname{P.~J. }%
   \def\ccname{Copie à }%
   \def\headtoname{}%
   \def\proofname{Démonstration}%
   }
\def\datefrench{%
   \def\today{\ifx\ier\undefined\def\ier{er}\fi%
      \ifnum\day=1\relax 1\ier%
      \else \number\day\fi%
      \space \ifcase\month%
      \or janvier\or février\or mars\or avril\or mai\or juin\or%
      juillet\or août\or septembre\or octobre\or novembre\or%
      décembre\fi%
      \space \number\year}}

\def\french@language{\language=\l@french}

\setlocalhyphenmins{french}{2}{2}%

\def\noextras@french{%
   \nofrench@punctuation%
   \nofrench@indent}

\def\blockextras@french{%
   \french@punctuation%
   \french@indent%
   \french@guillemets%
   }

\def\inlineextras@french{%
   \french@punctuation%
   \french@guillemets%
   }

\endinput