summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/scrp-eth.lua
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/mkiv/scrp-eth.lua')
-rw-r--r--tex/context/base/mkiv/scrp-eth.lua34
1 files changed, 17 insertions, 17 deletions
diff --git a/tex/context/base/mkiv/scrp-eth.lua b/tex/context/base/mkiv/scrp-eth.lua
index 43cb2ff6a..2be77a2ce 100644
--- a/tex/context/base/mkiv/scrp-eth.lua
+++ b/tex/context/base/mkiv/scrp-eth.lua
@@ -65,17 +65,17 @@ local function space_glue(current)
)
end
-local function insert_space(head,current)
- insert_node_before(head,current,space_glue(current))
+local function insert_space_before(head,current)
+ return insert_node_before(head,current,space_glue(current))
end
-local function insert_zerowidthspace(head,current)
- insert_node_before(head,current,new_glue(0))
+local function insert_zerowidthspace_before(head,current)
+ return insert_node_before(head,current,new_glue(0))
end
-local function insert_nobreakspace(head,current)
- insert_node_before(head,current,new_penalty(10000))
- insert_node_before(head,current,space_glue(current))
+local function insert_nobreakspace_before(head,current)
+ head, current = insert_node_before(head,current,new_penalty(10000))
+ return insert_node_before(head,current,space_glue(current))
end
-- syllable [zerowidthspace] syllable
@@ -90,19 +90,19 @@ end
local injectors = { -- [previous] [current]
ethiopic_syllable = {
- ethiopic_syllable = insert_zerowidthspace,
- ethiopic_word = insert_nobreakspace,
- ethiopic_sentence = insert_nobreakspace,
+ ethiopic_syllable = insert_zerowidthspace_before,
+ ethiopic_word = insert_nobreakspace_before,
+ ethiopic_sentence = insert_nobreakspace_before,
},
ethiopic_word = {
- ethiopic_syllable = insert_space,
- ethiopic_word = insert_space,
- ethiopic_sentence = insert_space,
+ ethiopic_syllable = insert_space_before,
+ ethiopic_word = insert_space_before,
+ ethiopic_sentence = insert_space_before,
},
ethiopic_sentence = {
- ethiopic_syllable = insert_space,
- ethiopic_word = insert_space,
- ethiopic_sentence = insert_space,
+ ethiopic_syllable = insert_space_before,
+ ethiopic_word = insert_space_before,
+ ethiopic_sentence = insert_space_before,
},
}
@@ -114,7 +114,7 @@ local function process(head,first,last)
local id = getid(current)
if id == glyph_code then
local scriptstatus = getattr(current,a_scriptstatus)
- local category = numbertocategory[scriptstatus]
+ local category = numbertocategory[scriptstatus]
if injector then
local action = injector[category]
if action then