diff options
Diffstat (limited to 'Master/texmf-dist/tex/xelatex/polyglossia/gloss-french.ldf')
-rw-r--r-- | Master/texmf-dist/tex/xelatex/polyglossia/gloss-french.ldf | 125 |
1 files changed, 125 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/xelatex/polyglossia/gloss-french.ldf b/Master/texmf-dist/tex/xelatex/polyglossia/gloss-french.ldf new file mode 100644 index 00000000000..584e224d6d2 --- /dev/null +++ b/Master/texmf-dist/tex/xelatex/polyglossia/gloss-french.ldf @@ -0,0 +1,125 @@ +\ProvidesFile{gloss-french.ldf}[polyglossia: module for french] +\makeatletter +\def\french@font{\normalfontlatin} + +\ifx\l@french\@undefined% + \xpg@nopatterns{French}% + \adddialect\l@french0% +\fi + +\def\french@punctuation{% + \frenchspacing% + \XeTeXinterchartokenstate=1% + \XeTeXcharclass `\! 7% + \XeTeXcharclass `\? 7% + \XeTeXcharclass `\; 7% + \XeTeXcharclass `\: 7% + \XeTeXinterchartoks 0 7 = {\unskip\kern.1667em}% + } + +\def\nofrench@punctuation{% + \nonfrenchspacing% + \XeTeXinterchartokenstate=0% +} + +\def\french@guillemets{% + \XeTeXinterchartokenstate=1% + \XeTeXcharclass `\« 8% + \XeTeXcharclass `\» 8% + \XeTeXinterchartoks 8 0 = {\kern.1667em}% + \XeTeXinterchartoks 0 8 = {\unskip\kern.1667em}% + \XeTeXinterchartoks 8 7 = {\unskip\kern.1667em}% "»;" -> "» ;" + \XeTeXinterchartoks 7 8 = {\unskip\kern.1667em}% "?»" -> "? »" +} + +%\newcounter{niveauguillemets}[paragraph] +% +%\def\tmp@normal{normal} +%\def\tmp@paragraphe{paragraphe} +%\def\tmp@ligne{ligne} + +%TODO +%\define@key{french}{guillemets}[normal]{ +% \def\@tmpa{#1} +% \ifx\@tmpa\tmp@ligne% +% \def\french@guill@mets{% FIXME +% \def\LeftPointingDoubleAngleQuotationMark{«\kern.1667em\setcounter{niveauguillemets}{1}% +% \ifthenelse{\value{niveauguillemets} = 1}{\localleftbox{«\kern.1667em}}% +% {\everypar={{«}\kern.1667em}\setcounter{niveauguillemets}{1}}}% +% \def\RightPointingDoubleAngleQuotationMark{\unskip\kern.1667em»% +% \everypar={}\localleftbox{}}}% +% \else\ifx\@tmpa\tmp@paragraphe% +% \def\french@guill@mets{\def\LeftPointingDoubleAngleQuotationMark{«\kern.1667em% +% \everypar={«\kern.1667em}}\def\RightPointingDoubleAngleQuotationMark% +% {\unskip\kern.1667em»\everypar={}}}% +% \else\ifx\@tmpa\tmp@normal% +% \def\french@guill@mets{\def\LeftPointingDoubleAngleQuotationMark{«\kern.1667em}% +% \def\RightPointingDoubleAngleQuotationMark{\unskip\kern.1667em»}}% +%\fi\fi\fi} +% +%\def\tmp@sans{sansaccents} +%\define@key{french}{majuscules}{% +% \def\@tmpa{#1}% +% \ifx\@tmpa\tmp@sans% +% \addfontfeature{Mapping=sansaccents}% <<< TODO! +% \fi} + +\def\captionsfrench{% + \def\refname{\textfrench{Références}}% + \def\abstractname{\textfrench{Résumé}}% + \def\bibname{\textfrench{Bibliographie}}% + \def\prefacename{\textfrench{Préface}}% + \def\chaptername{\textfrench{Chapitre}}% + \def\appendixname{\textfrench{Annexe}}% + \def\contentsname{\textfrench{Table des matières}}% + \def\listfigurename{\textfrench{Table des figures}}% + \def\listtablename{\textfrench{Liste des tableaux}}% + \def\indexname{\textfrench{Index}}% + \def\figurename{\textfrench{\scshape Fig.}}% + \def\tablename{\textfrench{\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{\textfrench{\protect\@Fpt partie}}% + \def\pagename{\textfrench{page}}% + \def\seename{\textfrench{\emph{voir}}}% + \def\alsoname{\textfrench{\emph{voir aussi}}}% + \def\enclname{\textfrench{P.~J. }}% + \def\ccname{\textfrench{Copie à }}% + \def\headtoname{}% + \def\proofname{\textfrench{Démonstration}}% + } +\def\datefrench{% + \def\today{\textfrench{\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{\protect\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 |