Fixes and improvements after testing with more complex objects

This commit is contained in:
Alessandro Ranellucci 2011-09-26 14:48:22 +02:00
parent bfad101c8c
commit 478047fad3
5 changed files with 70 additions and 5 deletions

View file

@ -86,7 +86,7 @@ sub point_in_polygon {
}
# if point is not in polygon, let's check whether it belongs to the contour
if (!$side) {
if (!$side && 0) {
foreach my $line (polygon_lines($polygon)) {
# calculate the Y in line at X of the point
if ($line->[A][X] == $line->[B][X]) {