Introduce a ->count method for all collections to save time

This commit is contained in:
Alessandro Ranellucci 2013-09-17 23:38:23 +02:00
parent d69c956e75
commit e0da81e8bf
7 changed files with 12 additions and 4 deletions

View file

@ -177,7 +177,7 @@ sub validate {
for my $copy (@{$self->objects->[$obj_idx]->copies}) {
my $copy_clearance = $clearance->clone;
$copy_clearance->translate(@$copy);
if (@{ intersection_ex(\@a, [$copy_clearance]) }) {
if (@{ intersection(\@a, [$copy_clearance]) }) {
die "Some objects are too close; your extruder will collide with them.\n";
}
@a = map @$_, @{union_ex([ @a, $copy_clearance ])};