Fixed minor harmless error in a couple tests

This commit is contained in:
Alessandro Ranellucci 2014-08-08 11:07:51 +02:00
parent 3920a7e8b6
commit 534b8c3f12
2 changed files with 4 additions and 4 deletions

View File

@ -46,7 +46,7 @@ sub scale_points (@) { map [scale $_->[X], scale $_->[Y]], @_ }
); );
my $flow = Slic3r::Flow->new( my $flow = Slic3r::Flow->new(
width => 0.69, width => 0.69,
spacing => 0.69, height => 0.4,
nozzle_diameter => 0.50, nozzle_diameter => 0.50,
); );
foreach my $angle (0, 45) { foreach my $angle (0, 45) {
@ -70,13 +70,13 @@ sub scale_points (@) { map [scale $_->[X], scale $_->[Y]], @_ }
); );
my $flow = Slic3r::Flow->new( my $flow = Slic3r::Flow->new(
width => $flow_spacing, width => $flow_spacing,
spacing => $flow_spacing, height => 0.4,
nozzle_diameter => $flow_spacing, nozzle_diameter => $flow_spacing,
); );
my ($params, @paths) = $filler->fill_surface( my ($params, @paths) = $filler->fill_surface(
$surface, $surface,
flow => $flow, flow => $flow,
layer_height => 0.4, layer_height => $flow->height,
density => $density // 1, density => $density // 1,
); );

View File

@ -20,7 +20,7 @@ use Test::More tests => 2;
{ {
my $flow = Slic3r::Flow->new( my $flow = Slic3r::Flow->new(
width => 1, width => 1,
spacing => 0.95, height => 0.4,
nozzle_diameter => 0.5, nozzle_diameter => 0.5,
); );
isa_ok $flow, 'Slic3r::Flow', 'new'; isa_ok $flow, 'Slic3r::Flow', 'new';