Refactoring: turn x_length and y_length in size

This commit is contained in:
Alessandro Ranellucci 2012-08-25 20:14:01 +02:00
parent 896641cb7e
commit a1ac866b84
4 changed files with 14 additions and 29 deletions

View file

@ -16,11 +16,7 @@ use Slic3r::Surface qw(:types);
sub scale_points (@) { map [scale $_->[X], scale $_->[Y]], @_ }
{
my $print = Slic3r::Print->new(
x_length => 50,
y_length => 50,
);
my $filler = Slic3r::Fill::Rectilinear->new(print => $print);
my $filler = Slic3r::Fill::Rectilinear->new(print => Slic3r::Print->new);
my $surface_width = 250;
my $distance = $filler->adjust_solid_spacing(
width => $surface_width,
@ -31,12 +27,8 @@ sub scale_points (@) { map [scale $_->[X], scale $_->[Y]], @_ }
}
{
my $print = Slic3r::Print->new(
x_length => scale 100,
y_length => scale 100,
);
my $filler = Slic3r::Fill::Rectilinear->new(
print => $print,
print => Slic3r::Print->new,
max_print_dimension => scale 100,
);
my $surface = Slic3r::Surface->new(