Keep edge lines in rectilinear infill even when the sides are not perfectly straight

This commit is contained in:
Alessandro Ranellucci 2013-07-29 13:36:22 +02:00
parent 99963775ff
commit 80676f358a
3 changed files with 26 additions and 7 deletions

View file

@ -84,6 +84,12 @@ sub wkt {
join ',', map "($_)", map { join ',', map "$_->[0] $_->[1]", @$_ } @$self;
}
sub dump_perl {
my $self = shift;
return sprintf "[%s]",
join ',', map "[$_]", map { join ',', map "[$_->[0],$_->[1]]", @$_ } @$self;
}
sub offset {
my $self = shift;
return Slic3r::Geometry::Clipper::offset($self, @_);