blob: 8e0cd78f0d9e0b168d0f7e392ca1c4c6cb46b6a0 (
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
|
%D \module
%D [ filefile=enco-fpl,
%D version=2000.08.20,
%D title=\CONTEXT\ Encoding Macros,
%D subtitle=Polish 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.
%D These definitions used to be part of lang-sla.tex.
\unprotect
\startlanguagespecifics[\s!pl]
\appendtoks \makecharacteractive / \to \everynormalcatcodes
\installcompoundcharacter /a {\k a}
\installcompoundcharacter /c {\'c}
\installcompoundcharacter /e {\k e}
\installcompoundcharacter /l {\l}
\installcompoundcharacter /n {\'n}
\installcompoundcharacter /o {\'o}
\installcompoundcharacter /s {\'s}
\installcompoundcharacter /x {\'z}
\installcompoundcharacter /z {\.z}
\installcompoundcharacter /A {\k A}
\installcompoundcharacter /C {\'C}
\installcompoundcharacter /E {\k E}
\installcompoundcharacter /L {\L}
\installcompoundcharacter /N {\'N}
\installcompoundcharacter /O {\'O}
\installcompoundcharacter /S {\'S}
\installcompoundcharacter /X {\'Z}
\installcompoundcharacter /Z {\.Z}
\stoplanguagespecifics
\startlanguagespecifics[\s!pl]
\installcompoundcharacter /, {\handlequotation\c!leftquotation}
\installcompoundcharacter /' {\handlequotation\c!rightquotation}
\def\setupPLlanguage%
{\setuplanguage
[\s!pl]
[\c!leftsentence=\leftguillemot,
\c!rightsentence=\rightguillemot,
\c!leftsubsentence=\leftsubguillemot,
\c!rightsubsentence=\rightsubguillemot]}
\installcompoundcharacter /< {{\setupPLlanguage|<|}}
\installcompoundcharacter /> {{\setupPLlanguage|>|}}
\installcompoundcharacter /- {|-|}
\stoplanguagespecifics
\startlanguagespecifics[\s!pl]
\definesortkey {/a}{a}{a}{\k a}
\definesortkey {/A}{a}{a}{\k a}
\definesortkey {/c}{c}{a}{\'c}
\definesortkey {/C}{c}{a}{\'c}
\definesortkey {/e}{e}{a}{\k e}
\definesortkey {/E}{e}{a}{\k e}
\definesortkey {/l}{l}{a}{\l }
\definesortkey {/L}{l}{a}{\l }
\definesortkey {/n}{n}{a}{\'n}
\definesortkey {/N}{n}{a}{\'n}
\definesortkey {/o}{o}{a}{\'o}
\definesortkey {/O}{o}{a}{\'o}
\definesortkey {/s}{s}{a}{\'s}
\definesortkey {/S}{s}{a}{\'s}
\definesortkey {/x}{z}{a}{\'x}
\definesortkey {/X}{z}{a}{\'x}
\definesortkey {/z}{z}{b}{\.z}
\definesortkey {/Z}{z}{b}{\.z}
\stoplanguagespecifics
\startencoding[pdfdoc]
\startlanguagespecifics[pl]% hm
\defineactivecharacter / {\simplifiedcompoundcharacter/}
\stoplanguagespecifics
\stopencoding
\protect \endinput
|