From 4474595629ed622739215e327c8ee97cd6d8e723 Mon Sep 17 00:00:00 2001 From: Alessandro Ranellucci <aar@cpan.org> Date: Thu, 20 Jun 2013 19:21:35 +0200 Subject: [PATCH] Removed useless code --- lib/Slic3r/ExPolygon.pm | 10 ---------- lib/Slic3r/Polygon.pm | 6 ------ 2 files changed, 16 deletions(-) diff --git a/lib/Slic3r/ExPolygon.pm b/lib/Slic3r/ExPolygon.pm index 3056d7053..56dc5841c 100644 --- a/lib/Slic3r/ExPolygon.pm +++ b/lib/Slic3r/ExPolygon.pm @@ -128,16 +128,6 @@ sub encloses_line { } } -sub point_on_segment { - my $self = shift; - my ($point) = @_; - for (@$self) { - my $line = $_->point_on_segment($point); - return $line if $line; - } - return undef; -} - sub bounding_box { my $self = shift; return $self->contour->bounding_box; diff --git a/lib/Slic3r/Polygon.pm b/lib/Slic3r/Polygon.pm index c69b9e00b..724887988 100644 --- a/lib/Slic3r/Polygon.pm +++ b/lib/Slic3r/Polygon.pm @@ -56,12 +56,6 @@ sub remove_acute_vertices { bless $_, 'Slic3r::Point' for @$self; } -sub point_on_segment { - my $self = shift; - my ($point) = @_; - return polygon_segment_having_point($self, $point); -} - sub encloses_point { my $self = shift; my ($point) = @_;