diff options
Diffstat (limited to 'tex/context/base/mkiv/scrp-eth.lua')
-rw-r--r-- | tex/context/base/mkiv/scrp-eth.lua | 34 |
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 |