Fix complete_objects after XS port. Includes regression test. #1511

This commit is contained in:
Alessandro Ranellucci 2013-11-02 14:44:30 +01:00
parent f491b7ba71
commit 0b63afb370
3 changed files with 17 additions and 8 deletions

View file

@ -1,4 +1,4 @@
use Test::More tests => 3;
use Test::More tests => 4;
use strict;
use warnings;
@ -42,4 +42,12 @@ use Slic3r::Test;
ok !defined (first { abs($_ - $config->retract_speed->[0]*60) < 5 } @retract_speeds), 'wipe moves don\'t retract faster than configured speed';
}
{
my $config = Slic3r::Config->new_from_defaults;
$config->set('complete_objects', 1);
$config->set('duplicate', 2);
my $print = Slic3r::Test::init_print('20mm_cube', config => $config);
ok Slic3r::Test::gcode($print), "complete_objects";
}
__END__