diff --git a/lib/Slic3r/Layer/Region.pm b/lib/Slic3r/Layer/Region.pm index d1fd5b9c6..ee3023277 100644 --- a/lib/Slic3r/Layer/Region.pm +++ b/lib/Slic3r/Layer/Region.pm @@ -538,7 +538,7 @@ sub process_bridges { } elsif (@edges) { my $center = Slic3r::Geometry::bounding_box_center([ map @$_, @edges ]); my $x = my $y = 0; - foreach my $point (map @$, @edges) { + foreach my $point (map @$_, @edges) { my $line = Slic3r::Line->new($center, $point); my $dir = $line->direction; my $len = $line->length;