lang-spa.mkiv /size: 3049 b    last modification: 2020-07-01 14:35
1
%D \module
2
%D [ file=lang-spa,
3
%D version=2002.04.17,
4
%D title=\CONTEXT\ Language Macros,
5
%D subtitle=Spacing,
6
%D author=Hans Hagen,
7
%D date=\currentdate,
8
%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
9
%C
10
%C This module is part of the \CONTEXT\ macro||package and is
11
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
12
%C details.
13 14
\writestatus
{
loading
}{
ConTeXt
Language
Macros
/
Spacing
}
15 16
%D This module was created in the process of enhancing
17
%D support for French (with the help of Daniel Flipo).
18
%D
19
%D This will (or already has) become obsolete!
20 21
\unprotect
22 23
\definehspace
[
\s!fr
]
[
quotation
]
[
\flexiblespaceamount
{
.
8
}{
.
3
}{
.
8
}
]
24
\definehspace
[
\s!fr
]
[
sentence
]
[
\fixedspaceamount
{
1
}
]
25 26
%definehspace [\s!fr] [quote] [\flexiblespaceamount{.8}{.3}{.8}]
27
%definehspace [\s!fr] [speech] [\flexiblespaceamount{.8}{.3}{.8}]
28 29
\definehspace
[
\s!fr
]
[
interquotation
]
[
\zeropoint
]
30
\definehspace
[
\s!fr
]
[
intersentence
]
[
\zeropoint
]
31 32
\definehspace
[
\string
:
]
[
\zeropoint
]
33
\definehspace
[
\string
;
]
[
\zeropoint
]
34
\definehspace
[
\string
!
]
[
\zeropoint
]
35
\definehspace
[
\string
?
]
[
\zeropoint
]
36 37
\definehspace
[
\s!fr
]
[
\string
:
]
[
\spaceamount
]
38
\definehspace
[
\s!fr
]
[
\string
;
]
[
.
1
6
6
6
7
em
]
39
\definehspace
[
\s!fr
]
[
\string
!
]
[
.
1
6
6
6
7
em
]
40
\definehspace
[
\s!fr
]
[
\string
?
]
[
.
1
6
6
6
7
em
]
41 42
%D Alternative discretionary handlers:
43 44
%definetextmodediscretionary : {\removeunwantedspaces\prewordbreak\kern\hspaceamount\currentlanguage{:}:}
45
%definetextmodediscretionary ; {\removeunwantedspaces\prewordbreak\kern\hspaceamount\currentlanguage{;};}
46
%definetextmodediscretionary ? {\removeunwantedspaces\prewordbreak\kern\hspaceamount\currentlanguage{?}?}
47
%definetextmodediscretionary ! {\removeunwantedspaces\prewordbreak\kern\hspaceamount\currentlanguage{!}!}
48 49
\definetextmodediscretionary
:
{
\removeunwantedspaces
\wordboundary\kern
\hspaceamount
\currentlanguage
{
:
}
:
}
50
\definetextmodediscretionary
;
{
\removeunwantedspaces
\wordboundary\kern
\hspaceamount
\currentlanguage
{
;
}
;
}
51
\definetextmodediscretionary
?
{
\removeunwantedspaces
\wordboundary\kern
\hspaceamount
\currentlanguage
{
?
}
?
}
52
\definetextmodediscretionary
!
{
\removeunwantedspaces
\wordboundary\kern
\hspaceamount
\currentlanguage
{
!
}
!
}
53 54
%D \startbuffer
55
%D \mainlanguage[en] \quotation{test \quotation{test} test}\par
56
%D \mainlanguage[nl] \quotation{test \quotation{test} test}\par
57
%D \mainlanguage[fr] \quotation{test \quotation{test} test}\par
58
%D
59
%D \mainlanguage[en] \quotation{\quotation{test} test}\par
60
%D \mainlanguage[nl] \quotation{\quotation{test} test}\par
61
%D \mainlanguage[fr] \quotation{\quotation{test} test}\par
62
%D
63
%D \mainlanguage[en] |<|test |<|test|>| test|>| \par
64
%D \mainlanguage[nl] |<|test |<|test|>| test|>| \par
65
%D \mainlanguage[fr] |<|test |<|test|>| test|>| \par
66
%D
67
%D \mainlanguage[en] |<||<|test|>| test|>| \par
68
%D \mainlanguage[nl] |<||<|test|>| test|>| \par
69
%D \mainlanguage[fr] |<||<|test|>| test|>| \par
70
%D \stopbuffer
71
%D
72
%D \typebuffer {\getbuffer}
73 74
\protect
\endinput
75