diff options
| author | Alessandro Ranellucci <aar@cpan.org> | 2011-12-30 22:59:51 +0400 |
|---|---|---|
| committer | Alessandro Ranellucci <aar@cpan.org> | 2011-12-30 22:59:51 +0400 |
| commit | 8ed91a8ec4d22f1703d00aa1ff351d576be6f516 (patch) | |
| tree | 5d3691d2c41609e428e9da05134db8e1828d61e8 /t/polyclip.t | |
| parent | 2def6a9787556fda137b464d39122fcc7f98d612 (diff) | |
Very large refactoring. Ditched Slic3r::Polyline::Closed and reorganized geometric classes.
Diffstat (limited to 't/polyclip.t')
| -rw-r--r-- | t/polyclip.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/polyclip.t b/t/polyclip.t index 205f036c8..4b3006e1a 100644 --- a/t/polyclip.t +++ b/t/polyclip.t @@ -103,8 +103,8 @@ is_deeply $intersection, [ [12, 12], [18, 16] ], 'internal lines are preserved'; ], 'tangent line is clipped to square with hole'; } { - my $polyline = Slic3r::Polyline->cast([ [5, 18], [25, 18], [25, 15], [15, 15], [15, 12], [12, 12], [12, 5] ]); - is_deeply [ map $_->p, $polyline->clip_with_expolygon($expolygon) ], [ + my $polyline = Slic3r::Polyline->new([ [5, 18], [25, 18], [25, 15], [15, 15], [15, 12], [12, 12], [12, 5] ]); + is_deeply [ map $_, $polyline->clip_with_expolygon($expolygon) ], [ [ [10, 18], [20, 18] ], [ [20, 15], [16, 15] ], [ [15, 14], [15, 12], [12, 12], [12, 10] ], |