Update tests after recent serialization changes

This commit is contained in:
Alessandro Ranellucci 2012-07-21 14:57:41 +02:00
parent c7bc9bed46
commit f977aff82d
2 changed files with 2 additions and 3 deletions

View file

@ -59,8 +59,7 @@ use Slic3r::Geometry qw(epsilon scale X Y);
isa_ok $collection1->paths->[0], 'Slic3r::ExtrusionPath::Arc', 'path';
isa_ok $collection2->paths->[0], 'Slic3r::ExtrusionPath::Arc', 'path';
$_->deserialize for $collection1->paths->[0], $collection2->paths->[0];
my $expected_length = scale 7.06858347057701;
ok abs($collection1->paths->[0]->length - $expected_length) < scale epsilon, 'cw oriented arc has correct length';
ok abs($collection2->paths->[0]->length - $expected_length) < scale epsilon, 'ccw oriented arc has correct length';