Fix tests

This commit is contained in:
Alessandro Ranellucci 2014-06-25 11:02:09 +02:00
parent a11f31c0a8
commit 8b60db55de
2 changed files with 2 additions and 3 deletions

View File

@ -64,7 +64,6 @@ sub concave_points {
my $vertex_angle = Slic3r::Geometry::angle3points(@points_pp[$i, $i-1, $i+1]);
if ($vertex_angle <= $ccw_angle) {
push @concave, $points[$i];
use XXX; YYY ($points[$i]->pp);
}
}
return [@concave];

View File

@ -191,7 +191,7 @@ my $polygons = [
#==========================================================
{
my $square = Slic3r::Polygon->new(
my $square = Slic3r::Polygon->new_scale(
[150,100],
[200,100],
[200,200],
@ -203,7 +203,7 @@ my $polygons = [
}
{
my $square = Slic3r::Polygon->new(
my $square = Slic3r::Polygon->new_scale(
[200,200],
[100,200],
[100,100],