blob: 68325adde8a4deb10961be53d1a97cd3341efbbc (
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
|
%D \module
%D [ file=t-french,
%D version=2008.05.04,
%D title=\CONTEXT\ User Module,
%D subtitle=For French documents,
%D author=Peter Münster,
%D date=\currentdate,
%D copyright={Peter Münster}]
%C This module is copyrighted by Peter Münster.
%C Please send any comments to pmrb at free.fr.
%C You can find the latest version of this module on
%C http://modules.contextgarden.net/
% This program is free software; you can redistribute it and/or
% modify it under the terms of the GNU General Public License
% as published by the Free Software Foundation; either version 2
% of the License, or (at your option) any later version.
% This program is distributed in the hope that it will be useful,
% but without any warranty; without even the implied warranty of
% merchantability or fitness for a particular purpose. See the
% GNU General Public License for more details.
%D This module tries to do similar things as the frenchb.ldf in LaTeX:
%D \startitemize
%D \item automatic space before » and after «, :, ?, ; and !
%D \item changing symbol for itemize environment
%D \stopitemize
\writestatus{loading}{Typesetting French documents}
\doifnotmode{mkiv}{\writestatus{error}{needs luatex}\wait\end}
\startlanguagespecifics[fr]
\setcharacterspacing[frenchpunctuation]
\setupitemize[symbol=2]
\lccode`\'=`\'
\stoplanguagespecifics
\appendtoks
\setcharacterspacing[reset]%
\setupitemize[symbol=\currentitemlevel]%
\to \everyresetlanguagespecifics
\mainlanguage[fr]
\doifnotmode{demo}{\endinput}
%D Usage example:
\def\myItems{%
\startitemize
\item test
\item test
\startitemize
\item test
\item test
\startitemize
\item test
\item test
\stopitemize
\stopitemize
\stopitemize}
\usemodule[french]
\starttext
Voilà: Voilà? Voilà! Voilà;
{\en some english text: «English» or \quotation{French}, ok?}
«voilà» \quote{voilà} \quotation{voilà}
\myItems
\en
\myItems
\stoptext
|