diff options
| author | Hans Hagen <pragma@wxs.nl> | 2019-09-09 14:55:35 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2019-09-09 14:55:35 +0200 |
| commit | 438b065a2337ee587442f25ddc587c4762f4d0b0 (patch) | |
| tree | d18c8f7e51dd7e96b8e774f94d3f8862a6c38f73 /tex/context/base/mkiv/mlib-pdf.lua | |
| parent | fca2d946bc4d3ef525c3a2c9016e3b88d6d09812 (diff) | |
| download | context-438b065a2337ee587442f25ddc587c4762f4d0b0.tar.gz | |
2019-09-09 13:52:00
Diffstat (limited to 'tex/context/base/mkiv/mlib-pdf.lua')
| -rw-r--r-- | tex/context/base/mkiv/mlib-pdf.lua | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tex/context/base/mkiv/mlib-pdf.lua b/tex/context/base/mkiv/mlib-pdf.lua index 92fde5e13..65f3b2016 100644 --- a/tex/context/base/mkiv/mlib-pdf.lua +++ b/tex/context/base/mkiv/mlib-pdf.lua @@ -400,6 +400,7 @@ function metapost.flush(specification,result) local linecap = -1 local linejoin = -1 local dashed = false +local linewidth = false local llx = properties.llx local lly = properties.lly local urx = properties.urx @@ -527,7 +528,10 @@ function metapost.flush(specification,result) 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 objecttype == "fill" then objecttype = "both" end @@ -614,6 +618,7 @@ function metapost.flush(specification,result) 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 end end end |