summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/luatex/luavlna/luavlna.sty
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