• R/O
  • HTTP
  • SSH
  • HTTPS

luatexja: Commit

ソースコードの管理場所


Commit MetaInfo

Revisiona922e6a6e042c3f797ecf2e122bf0e2bd9db4f86 (tree)
Time2018-08-06 20:16:33
AuthorHironori Kitagawa <h_kitagawa2001@yaho...>
CommiterHironori Kitagawa

Log Message

l_step: ignore alignment

Change Summary

Incremental Difference

--- a/src/ltj-adjust.lua
+++ b/src/ltj-adjust.lua
@@ -508,9 +508,12 @@ do
508508 local ltja = luatexja.adjust
509509 local copy_glue = ltjl.copy_glue
510510 local floor, max = math.floor, math.max
511- function ltjl.l_step(dist, g, adj, normal, bw)
511+ function ltjl.l_step(dist, g, adj, normal, bw, loc)
512+ if loc=='alignment' then
513+ return ltjl.l_dummy(dist, g, adj, normal, bw, loc)
514+ end
512515 if dist < tex.lineskiplimit then
513- local f = max(1, bw*ltja.step_factor)
516+ local f = max(1, bw*ltja.step_factor)
514517 copy_glue(g, tex.baselineskip, 1, normal - f * floor((dist-tex.lineskip.width)/f))
515518 else
516519 copy_glue(g, tex.baselineskip, 2, normal)
--- a/src/ltj-lineskip.lua
+++ b/src/ltj-lineskip.lua
@@ -30,7 +30,7 @@ ltjl.copy_glue = copy_glue
3030 function ltjl.p_dummy(before, after)
3131 return nil, 0
3232 end
33-function ltjl.l_dummy(dist, g, adj, normal, bw)
33+function ltjl.l_dummy(dist, g, adj, normal, bw, loc)
3434 if dist < tex.lineskiplimit then
3535 copy_glue(g, tex.lineskip, 1, tex.lineskip.width + adj)
3636 else
@@ -96,7 +96,7 @@ do
9696 end
9797 end
9898 local g = node_new(id_glue)
99- ltj_skip(lmin or normal, g, adj, normal, bw)
99+ ltj_skip(lmin or normal, g, adj, normal, bw, loc)
100100 node_write(g)
101101 end
102102 node_write(new_b)
Show on old repository browser