blob: 059c260ea11f36fb626e7dcd49bfb4ac9ad18d67 (
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
|
\ProvidesPackage{luavlna}[2017/09/30 luavlna]
\def\nosingledefaults{\relax}
\input luavlna
\def\singlechars#1#2{%
\ifcsname l@#1\endcsname%
\expandafter\directlua\expandafter{set_singlechars("\the\csname l@#1\endcsname","#2")}%
\fi%
}
% Define compound initials
\def\compoundinitials#1#2{%
\ifcsname l@#1\endcsname%
\expandafter\directlua\expandafter{set_compounds("\the\csname l@#1\endcsname","#2")}%
\fi%
}
\AtBeginDocument{%
\singlechars{czech}{AIiVvOoUuSsZzKk}
\singlechars{slovak}{AIiVvOoUuSsZzKk}
\compoundinitials{czech}{Ch,CH}
}
\endinput
|
