Fix regression about percent extrusion width not being validated. Includes regression test
This commit is contained in:
parent
8331c54b67
commit
4c650a6d80
@ -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 {
|
||||||
|
@ -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__
|
||||||
|
Loading…
Reference in New Issue
Block a user