diff options
author | Hans Hagen <pragma@wxs.nl> | 2022-12-27 21:56:16 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2022-12-27 21:56:16 +0100 |
commit | db25374e65d39dc254ddce11b40ad4a95e6a385b (patch) | |
tree | 9e0c569395847f1db266ea0e80660e8680d26318 /tex/context/base/mkxl/spac-ver.lmt | |
parent | 32ca60de005df4b45e8904ab63e0e03978331c6f (diff) | |
download | context-db25374e65d39dc254ddce11b40ad4a95e6a385b.tar.gz |
2022-12-27 21:04:00
Diffstat (limited to 'tex/context/base/mkxl/spac-ver.lmt')
-rw-r--r-- | tex/context/base/mkxl/spac-ver.lmt | 28 |
1 files changed, 21 insertions, 7 deletions
diff --git a/tex/context/base/mkxl/spac-ver.lmt b/tex/context/base/mkxl/spac-ver.lmt index c9faf3873..01690b7ae 100644 --- a/tex/context/base/mkxl/spac-ver.lmt +++ b/tex/context/base/mkxl/spac-ver.lmt @@ -2233,7 +2233,7 @@ do local flush = false stackhack = true -- todo: only when grid snapping once enabled - for n, id, subtype in nextnode, newhead do -- we could just look for glue nodes + for n, id, subtype in nextnode, newhead do if id ~= glue_code then flush = true elseif subtype == userskip_code then @@ -2359,7 +2359,9 @@ do enabled = v end) - local ignoredepth = -65536000 + local function ignoredepth() + return texgetdimen("ignoredepthcriterium") -- -65536000 + end -- A previous version analyzed the number of lines moved to the next page in -- synchronizepage because prevgraf is unreliable in that case. However, we cannot @@ -2423,16 +2425,17 @@ do local newdepth = outer.prevdepth local olddepth = newdepth if not texlists.pagehead then - newdepth = ignoredepth - texset("prevdepth",ignoredepth) - outer.prevdepth = ignoredepth + newdepth = ignoredepth() + texset("prevdepth",newdepth) + outer.prevdepth = newdepth end report("page %i, prevdepth %p => %p",texgetcount("realpageno"),olddepth,newdepth) -- report("list %s",nodes.idsandsubtypes(head)) else if not texlists.pagehead then - texset("prevdepth",ignoredepth) - outer.prevdepth = ignoredepth + local newdepth = ignoredepth() + texset("prevdepth",newdepth) + outer.prevdepth = newdepth end end end @@ -2893,3 +2896,14 @@ do } end + +do + + implement { + name = "injectzerobaselineskip", + protected = true, + public = true, + actions = { nodes.pool.baselineskip, context }, + } + +end |