Refactored Line objects to arrayrefs

This commit is contained in:
Alessandro Ranellucci 2011-10-12 16:27:40 +02:00
parent e410410dc7
commit c97a89c07c
10 changed files with 47 additions and 44 deletions

View file

@ -104,7 +104,6 @@ sub add_line {
my $self = shift;
my ($line) = @_;
$line = Slic3r::Line->cast($line);
return if $line->a->coincides_with($line->b);
push @{ $self->lines }, $line;
@ -135,7 +134,7 @@ sub make_surfaces {
# so a simple head-to-tail algorithm would work
my @lines = ();
push @lines, map $_->p, @{$self->lines};
push @lines, @{$self->lines};
#@lines = grep line_length($_) > xx, @lines;
#use Slic3r::SVG;