Removed useless code

This commit is contained in:
Alessandro Ranellucci 2013-06-20 19:21:35 +02:00
parent b414c50b68
commit 4474595629
2 changed files with 0 additions and 16 deletions

View file

@ -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;