summaryrefslogtreecommitdiff
path: root/tex/context/base/mkxl/driv-shp.lmt
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/mkxl/driv-shp.lmt')
-rw-r--r--tex/context/base/mkxl/driv-shp.lmt17
1 files changed, 10 insertions, 7 deletions
diff --git a/tex/context/base/mkxl/driv-shp.lmt b/tex/context/base/mkxl/driv-shp.lmt
index 6c4ca79cc..9a72d834d 100644
--- a/tex/context/base/mkxl/driv-shp.lmt
+++ b/tex/context/base/mkxl/driv-shp.lmt
@@ -229,13 +229,13 @@ local flush_character do
end
if csx then
csx = csx * sx
-else
- csx = sx
+ else
+ csx = sx
end
if csy then
csy = csy * sy
-else
- csy = sy
+ else
+ csy = sy
end
-- here no current!
return flush_character(false,fnt,chr,factor,nest,pos_h,pos_v,pos_r,csx,csy)
@@ -834,7 +834,8 @@ local hlist_out, vlist_out do
-- cur_h = cur_h + wd - right -- hm, no left here?
cur_h = cur_h + wd -- see new tabulate alignment code
elseif id == glue_code then
- local gluewidth = effectiveglue(current,this_box)
+-- local gluewidth = effectiveglue(current,this_box)
+local gluewidth = effectiveglue(current,this_box,true)
if gluewidth ~= 0 then
if subtype >= leaders_code then
local leader = getleader(current)
@@ -1170,7 +1171,8 @@ local hlist_out, vlist_out do
-- if kern ~= 0 then
-- cur_h = cur_h + kern
-- else
- cur_h = cur_h + effectiveglue(current,this_box)
+-- cur_h = cur_h + effectiveglue(current,this_box)
+cur_h = cur_h + effectiveglue(current,this_box,true)
-- end
elseif id == dir_code then
-- We normally have proper begin-end pairs. A begin without end is (silently) handled
@@ -1285,7 +1287,8 @@ local hlist_out, vlist_out do
-- local id = getid(current)
for current, id, subtype in nextnode, current do
if id == glue_code then
- local glueheight = effectiveglue(current,this_box)
+-- local glueheight = effectiveglue(current,this_box)
+local glueheight = effectiveglue(current,this_box,true)
if glueheight ~= 0 then
if subtype >= leaders_code then
local leader = getleader(current)