From b36ed0538d4e5f59bd60f0bd04017507d213ee60 Mon Sep 17 00:00:00 2001 From: Mike Sheldrake Date: Thu, 28 Feb 2013 00:55:31 -0800 Subject: [PATCH] make sure combine infill test has infill to combine #1023 --- t/combineinfill.t | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/t/combineinfill.t b/t/combineinfill.t index 8c1ba9e77..aa4ed91a1 100644 --- a/t/combineinfill.t +++ b/t/combineinfill.t @@ -19,6 +19,7 @@ use Slic3r::Test; $config->set('top_solid_layers', 0); $config->set('infill_every_layers', 6); $config->set('layer_height', 0.06); + $config->set('perimeters', 1); my $test = sub { my ($shift) = @_; @@ -26,14 +27,16 @@ use Slic3r::Test; my $self = Slic3r::Test::init_print('20mm_cube', config => $config); $shift /= &Slic3r::SCALING_FACTOR; + my $scale = 4; # make room for fat infill lines with low layer height # Put a slope on the box's sides by shifting x and y coords by $tilt * (z / boxheight). # The test here is to put such a slight slope on the walls that it should # not trigger any extra fill on fill layers that should be empty when # combine infill is enabled. - $_->[0] += $shift * ($_->[2] / (20 / &Slic3r::SCALING_FACTOR)), for @{$self->objects->[0]->meshes->[0]->vertices}; - $_->[1] += $shift * ($_->[2] / (20 / &Slic3r::SCALING_FACTOR)), for @{$self->objects->[0]->meshes->[0]->vertices}; - + $_->[0] += $shift * ($_->[2] / (20 / &Slic3r::SCALING_FACTOR)) for @{$self->objects->[0]->meshes->[0]->vertices}; + $_->[1] += $shift * ($_->[2] / (20 / &Slic3r::SCALING_FACTOR)) for @{$self->objects->[0]->meshes->[0]->vertices}; + $_ = [$_->[0]*$scale, $_->[1]*$scale, $_->[2]] for @{$self->objects->[0]->meshes->[0]->vertices}; + # copy of Print::export_gcode() up to the point # after fill surfaces are combined $self->init_extruders;