diff options
author | Marius <mariausol@gmail.com> | 2012-10-06 17:00:14 +0300 |
---|---|---|
committer | Marius <mariausol@gmail.com> | 2012-10-06 17:00:14 +0300 |
commit | f5507b17b30a20c0e3c279291ce448b7886e3b0c (patch) | |
tree | 77ba7cf932694debf45cd6235bf100ffcd83789a /tex/context/base/font-otn.lua | |
parent | e420836b84231f486ddaa65089ed3fde00372699 (diff) | |
download | context-f5507b17b30a20c0e3c279291ce448b7886e3b0c.tar.gz |
beta 2012.10.06 15:31
Diffstat (limited to 'tex/context/base/font-otn.lua')
-rw-r--r-- | tex/context/base/font-otn.lua | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/tex/context/base/font-otn.lua b/tex/context/base/font-otn.lua index 51b6e03a4..6ea35f139 100644 --- a/tex/context/base/font-otn.lua +++ b/tex/context/base/font-otn.lua @@ -387,16 +387,18 @@ end -- iteration this becomes a KAF-LAM-ALEF with a SHADDA on the second and a FATHA on the -- third component. -local function getcomponentindex(start) -- so we cannot remove components ! - local i = 0 - if start.subtype == ligature_code then - local comp = start.components - while comp do - i = i + getcomponentindex(comp) - comp = comp.next +local function getcomponentindex(start) + if start.id ~= glyph_code then + return 0 + elseif start.subtype == ligature_code then + local i = 0 + local components = start.components + while components do + i = i + getcomponentindex(components) + components = components.next end return i - elseif not marks[start.char] then + elseif not marks[start.char] then return 1 else return 0 |