diff options
| -rw-r--r-- | src/SVG/SVG2zinc.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/SVG/SVG2zinc.pm b/src/SVG/SVG2zinc.pm index 09d577b..54126fe 100644 --- a/src/SVG/SVG2zinc.pm +++ b/src/SVG/SVG2zinc.pm @@ -1210,7 +1210,7 @@ sub polyline { } %attrs = &expandAttributes ($elementname,%attrs); my ($name,$natural) = &name ($elementname, $attrs{id}); - my $res = printFindKey ($name)."\$previous ->add('curve',$current_group,[" . &points(\%attrs); + my $res = printFindKey ($name)."\$previous = ->add('curve',$current_group,[" . &points(\%attrs); $res .= "]"; $res .= ", -tags => ['polyline',$name]" if ($natural or $attrs{transform}); $res .= ", -priority => 10"; |