3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-07-23 22:54:08 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 2

Code optimization

Browse source
This commit is contained in:
Alessandro Ranellucci 2012-02-25 22:15:34 +01:00
parent 170d29a789
commit c98f6734c7
5 changed files with 13 additions and 20 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lib/Slic3r/ExPolygon.pm
View file

@ -121,8 +121,7 @@ sub bounding_box_polygon {
sub clip_line {
my $self = shift;
my ($line) = @_;
$line = Slic3r::Line->new($line) if ref $line eq 'ARRAY';
my ($line) = @_; # line must be a Slic3r::Line object
my @intersections = grep $_, map $_->intersection($line, 1), map $_->lines, @$self;
my @dir = (