Fix toolpath preview after recent change of semantics of LayerRegion::perimeters

This commit is contained in:
Alessandro Ranellucci 2015-01-08 15:41:17 +01:00
parent 8b11adb883
commit 2f255620c6

View file

@ -301,7 +301,7 @@ sub Render {
foreach my $layerm (@{$layer->regions}) { foreach my $layerm (@{$layer->regions}) {
if ($object->step_done(STEP_PERIMETERS)) { if ($object->step_done(STEP_PERIMETERS)) {
$self->color([0.7, 0, 0]); $self->color([0.7, 0, 0]);
$self->_draw($object, $print_z, $_) for @{$layerm->perimeters}; $self->_draw($object, $print_z, $_) for map @$_, @{$layerm->perimeters};
} }
if ($object->step_done(STEP_INFILL)) { if ($object->step_done(STEP_INFILL)) {