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
|
require('polyglossia-punct')
-- How do we now, in Lua, what a \thinspace is? In the LaTeX source (latex.ltx)
-- it is defined as:
-- \def\thinspace{\leavevmode@ifvmode\kern .16667em }
-- I see no way of seeing if it has been overriden or not. So we stick to this
-- value.
local thinspace = 0.16667 -- 1/6
local function activate_sanskrit_punct()
polyglossia.activate_punct('sanskrit')
polyglossia.clear_spaced_characters('sanskrit')
polyglossia.add_left_spaced_character('sanskrit','!',thinspace,'quad')
polyglossia.add_left_spaced_character('sanskrit','?',thinspace,'quad')
polyglossia.add_left_spaced_character('sanskrit','‼',thinspace,'quad')
polyglossia.add_left_spaced_character('sanskrit','⁇',thinspace,'quad')
polyglossia.add_left_spaced_character('sanskrit','⁈',thinspace,'quad')
polyglossia.add_left_spaced_character('sanskrit','⁉',thinspace,'quad')
polyglossia.add_left_spaced_character('sanskrit',':',thinspace,'quad')
polyglossia.add_left_spaced_character('sanskrit',';',thinspace,'quad')
polyglossia.add_left_spaced_character('sanskrit','।',thinspace,'quad') -- danda, U+0964
polyglossia.add_left_spaced_character('sanskrit','॥',thinspace,'quad') -- double danda, U+0965
end
local function deactivate_sanskrit_punct()
polyglossia.deactivate_punct()
end
polyglossia.activate_sanskrit_punct = activate_sanskrit_punct
polyglossia.deactivate_sanskrit_punct = deactivate_sanskrit_punct
|