From 0a5f59a9aa25b3de7e9659b39ad201aaf7eb5a67 Mon Sep 17 00:00:00 2001 From: Hans Hagen Date: Fri, 27 Sep 2019 20:24:34 +0200 Subject: 2019-09-27 18:10:00 --- tex/context/base/mkiv/mlib-pdf.lua | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) (limited to 'tex/context/base/mkiv/mlib-pdf.lua') diff --git a/tex/context/base/mkiv/mlib-pdf.lua b/tex/context/base/mkiv/mlib-pdf.lua index 524e930a9..ece332d84 100644 --- a/tex/context/base/mkiv/mlib-pdf.lua +++ b/tex/context/base/mkiv/mlib-pdf.lua @@ -400,7 +400,7 @@ function metapost.flush(specification,result) local linecap = -1 local linejoin = -1 local dashed = false -local linewidth = false + local linewidth = false local llx = properties.llx local lly = properties.lly local urx = properties.urx @@ -533,10 +533,10 @@ local linewidth = false if pen then if pen.type == "elliptical" then transformed, penwidth = pen_characteristics(original) -- boolean, value -if penwidth ~= linewidth then - result[#result+1] = f_w(penwidth) -- todo: only if changed - linewidth = penwidth -end + if penwidth ~= linewidth then + result[#result+1] = f_w(penwidth) + linewidth = penwidth + end if objecttype == "fill" then objecttype = "both" end @@ -624,8 +624,7 @@ end end if object.grouped then -- can be qQ'd so changes can end up in groups - miterlimit, linecap, linejoin, dashed = -1, -1, -1, "" -- was false -linewidth = false + miterlimit, linecap, linejoin, dashed, linewidth = -1, -1, -1, "", false end end end -- cgit v1.2.3