2015-12-17 15:59:00

1 files changed, 11 insertions, 5 deletions

diff --git a/tex/context/base/font-dsp.lua b/tex/context/base/font-dsp.lua
index 22f822979..05420f8d6 100644
--- a/tex/context/base/font-dsp.lua
+++ b/tex/context/base/font-dsp.lua
@@ -373,7 +373,7 @@ local function unchainedcontext(f,fontdata,lookupid,lookupoffset,offset,glyphs,n
         local coverage     = readushort(f)
         local subclasssets = readarray(f)
         local rules        = { }
-        if subclassets then
+        if subclasssets then
             coverage = readcoverage(f,tableoffset+coverage,true)
             for i=1,#subclasssets do
                 local offset = subclasssets[i]
@@ -1479,7 +1479,7 @@ do
         local glyphs         = fontdata.glyphs
         local nofglyphs      = fontdata.nofglyphs or #glyphs
         local noflookups     = #lookups
-        local lookupprefix   = sub(what,1,1)
+        local lookupprefix   = sub(what,2,2) -- g[s|p][ub|os]
         --
         for lookupid=1,noflookups do
             local lookup     = lookups[lookupid]
@@ -1491,8 +1491,13 @@ do
                 local nofsubtables = #subtables
                 local order        = lookup.order
                 local flags        = lookup.flags
-             -- local chain        = lookup.chain
+                -- this is expected in th efont handler (faster checking)
+                if flags[1] then flags[1] = "mark" end
+                if flags[2] then flags[2] = "ligature" end
+                if flags[3] then flags[2] = "base" end
+                --
                 local markclass    = lookup.markclass
+             -- local chain        = lookup.chain
                 if nofsubtables > 0 then
                     local steps     = { }
                     local nofsteps  = 0
@@ -1652,8 +1657,9 @@ do
         end
 
         for i, n in sortedhash(sublookupcheck) do
-            if n == 0 then
-                report("%s lookup %i is not used",what,i) -- lookups[i].done.lookupid
+            local t = lookups[i].type
+            if n == 0 and t ~= "extension" then
+                report("%s lookup %i of type %a is not used",what,i,t)
             end
         end