Fix scaled model objects causing a test to fail

This commit is contained in:
Alessandro Ranellucci 2014-07-04 10:45:29 +02:00
parent bd03747dc1
commit d416766d90
2 changed files with 6 additions and 2 deletions

View File

@ -393,8 +393,12 @@ sub raw_mesh {
sub raw_bounding_box { sub raw_bounding_box {
my $self = shift; my $self = shift;
my @meshes = map $_->mesh, grep !$_->modifier, @{ $self->volumes }; my @meshes = map $_->mesh->clone, grep !$_->modifier, @{ $self->volumes };
die "No meshes found" if !@meshes; die "No meshes found" if !@meshes;
my $instance = $self->instances->[0];
$instance->transform_mesh($_, 1) for @meshes;
my $bb = (shift @meshes)->bounding_box; my $bb = (shift @meshes)->bounding_box;
$bb->merge($_->bounding_box) for @meshes; $bb->merge($_->bounding_box) for @meshes;
return $bb; return $bb;