summaryrefslogtreecommitdiff
path: root/tex/context/base/enco-ffr.tex
blob: abe3627504dc2beb1f75cc5f8936bc5946ac3f8e (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
%D \module
%D   [     file=enco-ffr,
%D      version=2002.05.07,
%D        title=\CONTEXT\ Encoding Macros,
%D     subtitle=French Input Filter,
%D       author=Hans Hagen,
%D         date=\currentdate,
%D    copyright=Hans Hagen]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.

% \definehspace[fr][:][.25em]
% \definehspace[fr][;][.25em]
% \definehspace[fr][!][.25em]
% \definehspace[fr][?][.25em]

\enablemode[activecolon] \usemodule[tryout] % for the moment

\installactivecharacter :
\installactivecharacter ;
\installactivecharacter ?
\installactivecharacter !

\unprotect

\startlanguagespecifics[\s!fr]
    \definetextmodediscretionary : {\removeunwantedspaces\prewordbreak\kern\hspaceamount\currentmainlanguage{:}:}
    \definetextmodediscretionary ; {\removeunwantedspaces\prewordbreak\kern\hspaceamount\currentmainlanguage{;};}
    \definetextmodediscretionary ? {\removeunwantedspaces\prewordbreak\kern\hspaceamount\currentmainlanguage{?}?}
    \definetextmodediscretionary ! {\removeunwantedspaces\prewordbreak\kern\hspaceamount\currentmainlanguage{!}!}
\stoplanguagespecifics

\startlanguagespecifics[\s!fr]
    \defineactivecharacter : {\mathortext{:}{\directdiscretionary{:}}}
    \defineactivecharacter ; {\mathortext{;}{\directdiscretionary{;}}}
    \defineactivecharacter ! {\mathortext{!}{\directdiscretionary{!}}}
    \defineactivecharacter ? {\mathortext{?}{\directdiscretionary{?}}}
\stoplanguagespecifics

% maybe tricky due to possible name clashes:
%
% \def\ieme {\highordinalstr{e}}
% \def\iemes{\highordinalstr{es}}
% \def\ier  {\highordinalstr{er}}
% \def\iers {\highordinalstr{ers}}
% \def\iere {\highordinalstr{re}}
% \def\ieres{\highordinalstr{res}}

\protect \endinput