From 34417574f5a823994b0e16beb97d2bac877ecf6f Mon Sep 17 00:00:00 2001 From: Vojtech Bubnik Date: Wed, 24 Feb 2021 18:48:55 +0100 Subject: [PATCH] Fix of Perl combine infill unit test after a change in raft: 1st object layer over raft is no more printed with bridging infill. --- t/combineinfill.t | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/t/combineinfill.t b/t/combineinfill.t index 282bf467ac..925e5b11d4 100644 --- a/t/combineinfill.t +++ b/t/combineinfill.t @@ -43,9 +43,11 @@ plan tests => 8; my $layers_with_infill = grep $_ > 0, values %layer_infill; is scalar(keys %layers), $layers_with_perimeters+$config->raft_layers, 'expected number of layers'; - # first infill layer is never combined, so we don't consider it - $layers_with_infill--; - $layers_with_perimeters--; + if ($config->raft_layers == 0) { + # first infill layer printed directly on print bed is not combined, so we don't consider it. + $layers_with_infill--; + $layers_with_perimeters--; + } # we expect that infill is generated for half the number of combined layers # plus for each single layer that was not combined (remainder)