Fix regression about percent extrusion width not being validated. Includes regression test

This commit is contained in:
Alessandro Ranellucci 2014-02-13 18:42:15 +01:00
parent 8331c54b67
commit 4c650a6d80
2 changed files with 10 additions and 2 deletions

View File

@ -325,7 +325,7 @@ sub validate {
my $max_nozzle_diameter = max(@{ $self->nozzle_diameter }); my $max_nozzle_diameter = max(@{ $self->nozzle_diameter });
die "Invalid extrusion width (too large)\n" die "Invalid extrusion width (too large)\n"
if defined first { $_ > 10 * $max_nozzle_diameter } if defined first { $_ > 10 * $max_nozzle_diameter }
map $self->get_value("${_}_extrusion_width"), map $self->get_abs_value_over("${_}_extrusion_width", $self->layer_height),
qw(perimeter infill solid_infill top_infill support_material first_layer); qw(perimeter infill solid_infill top_infill support_material first_layer);
} }
@ -355,6 +355,8 @@ sub validate {
} }
} }
} }
return 1;
} }
sub replace_options { sub replace_options {

View File

@ -1,4 +1,4 @@
use Test::More tests => 1; use Test::More tests => 2;
use strict; use strict;
use warnings; use warnings;
@ -17,4 +17,10 @@ use Slic3r::Test;
is $ENV{SLIC3R_LAYER_HEIGHT}, '0.123', 'setenv'; is $ENV{SLIC3R_LAYER_HEIGHT}, '0.123', 'setenv';
} }
{
my $config = Slic3r::Config->new_from_defaults;
$config->set('perimeter_extrusion_width', '250%');
ok $config->validate, 'percent extrusion width is validated';
}
__END__ __END__