get rid of attr_orig_char

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

diff --git a/src/luatexja.lua b/src/luatexja.lua
index d404278..70f576a 100644 (file)
--- a/src/luatexja.lua
+++ b/src/luatexja.lua
@@ -328,6 +328,7 @@ do
       tex_set_attr('global', attr_icflag, 0)
       if gc == 'fin_row' then return head
       else
+            --luatexja.ext_show_node_list(head, 'T> ', print)
            start_time_measure('jfmglue')
            local p = ltjj.main(to_direct(head),mode, dir)
            stop_time_measure('jfmglue')
@@ -413,7 +414,7 @@ local function debug_show_node_X(p,print_fn, limit)
       if (p.shift or 0)~=0 then
          s = s .. ', shifted ' .. print_scaled(p.shift)
       end
-      if p.glue_sign or 0>= 1 then
+      if p.glue_set and p.glue_sign ==2 or ( p.glue_sign==1 and p.glue_set>0) then
          s = s .. ' glue set '
          if p.glue_sign == 2 then s = s .. '-' end
          s = s .. tostring(floor(p.glue_set*10000)/10000)