2018-07-25 19:49:00

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