diff options
| author | Hans Hagen <pragma@wxs.nl> | 2021-02-14 17:26:41 +0100 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2021-02-14 17:26:41 +0100 |
| commit | cf803ad70f7a6ad2e7779875fcc02dd711706fc6 (patch) | |
| tree | b0602f037d8e025955d2fe1eebf962cd7e8bd90a /tex/context/base/mkxl/pack-rul.lmt | |
| parent | 79bdc958cec8c084f8c8472e8f600c60969b03fa (diff) | |
| download | context-cf803ad70f7a6ad2e7779875fcc02dd711706fc6.tar.gz | |
2021-02-14 16:14:00
Diffstat (limited to 'tex/context/base/mkxl/pack-rul.lmt')
| -rw-r--r-- | tex/context/base/mkxl/pack-rul.lmt | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/tex/context/base/mkxl/pack-rul.lmt b/tex/context/base/mkxl/pack-rul.lmt index e5b2887ba..d99f0a78e 100644 --- a/tex/context/base/mkxl/pack-rul.lmt +++ b/tex/context/base/mkxl/pack-rul.lmt @@ -57,6 +57,7 @@ local getboxglue = nuts.getboxglue local hpack = nuts.hpack local getdimensions = nuts.dimensions +local naturalhsize = nuts.naturalhsize local flush_node = nuts.flush local traversers = nuts.traversers @@ -97,7 +98,15 @@ local function doreshapeframedbox(n) if list then if id == hlist_code then if subtype == boxlist_code or subtype == linelist_code then - lastlinelength = getdimensions(list) + -- the fast one also returns compensation (plus node) + local w, c, n = naturalhsize(list) + if n then + -- can become an option in framed: strict + w = w - c + else + -- print("no compensation found") + end + lastlinelength = w else lastlinelength = width end |