Better pruning of thin walls to avoid unwanted extra extrusions. Includes regression test. #1794

This commit is contained in:
Alessandro Ranellucci 2014-03-02 00:28:10 +01:00
parent c1a5cddcd2
commit 8c4a0f23df
4 changed files with 74 additions and 4 deletions

View file

@ -50,7 +50,7 @@ sub output {
my $g = $svg->group(
style => {
'stroke-width' => 2,
'stroke-width' => 0,
'stroke' => $colour || 'black',
'fill' => ($type !~ /polygons/ ? 'none' : ($colour || 'grey')),
'fill-type' => $filltype,
@ -68,7 +68,7 @@ sub output {
my $g = $svg->group(
style => {
'stroke-width' => 2,
'stroke-width' => ($method eq 'polyline') ? 1 : 0,
'stroke' => $colour || 'black',
'fill' => ($type !~ /polygons/ ? 'none' : ($colour || 'grey')),
},