lltjp-fontspec: adapt fontspec 2.7e, and removed codes for <2.7c

[luatex-ja/luatexja.git] / src / ltj-lineskip.lua

diff --git a/src/ltj-lineskip.lua b/src/ltj-lineskip.lua
index c92d02e..f5c439e 100644 (file)
--- a/src/ltj-lineskip.lua
+++ b/src/ltj-lineskip.lua
@@ -74,6 +74,7 @@ do
 end
 
 do
+   local p_dummy = ltjl.p_dummy
    local make_dir_whatsit = luatexja.direction.make_dir_whatsit
    local get_dir_count = luatexja.direction.get_dir_count
    local node_write = node.direct.write
@@ -88,8 +89,10 @@ do
            - getfield(new_b, mirrored and 'depth' or 'height')
          local lmin, adj = nil, 0
          local tail = to_direct(tex.nest[tex.nest.ptr].tail)
-         while tail and (id_glue<=getid(tail)) and (getid(tail)<=id_penalty) do
-            tail = node_prev(tail)
+         if p_dummy~=ltj_profiler then
+            while tail and (id_glue<=getid(tail)) and (getid(tail)<=id_penalty) do
+               tail = node_prev(tail)
+            end
          end
         if tail then
            if getid(tail)==id_hlist and getid(new_b)==id_hlist then