One more debugging statement left in

This commit is contained in:
Alessandro Ranellucci 2012-05-19 21:03:24 +02:00
parent a981ac5c8e
commit 9f21d5b3c2

View File

@ -236,7 +236,7 @@ sub polyline_lines {
}
sub polygon_lines {
my ($polygon) = @_;use XXX; ZZZ $polygon if !eval { @$polygon };
my ($polygon) = @_;
return polyline_lines([ @$polygon, $polygon->[0] ]);
}