From c210f5ccc4ab3106de9fdba555281c2ba7e1973a Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Mon, 29 Jul 2013 14:16:33 +0200
Subject: [PATCH] Bugfix: fatal error when failed loops were included in
 slices. #1358

---
 lib/Slic3r/TriangleMesh.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/Slic3r/TriangleMesh.pm b/lib/Slic3r/TriangleMesh.pm
index d6d5dc91..8c1738d4 100644
--- a/lib/Slic3r/TriangleMesh.pm
+++ b/lib/Slic3r/TriangleMesh.pm
@@ -267,10 +267,10 @@ sub make_loops {
     }
     
     # TODO: we should try to combine failed loops
-    for (grep @$_ >= 3, @failed_loops) {
-        push @polygons, Slic3r::Polygon->new(@$_);
+    for my $loop (grep @$_ >= 3, @failed_loops) {
+        push @polygons, Slic3r::Polygon->new(map $_->[I_A], @$loop);
         Slic3r::debugf "  Discovered failed %s polygon of %d points\n",
-            ($polygons[-1]->is_counter_clockwise ? 'ccw' : 'cw'), scalar(@$_)
+            ($polygons[-1]->is_counter_clockwise ? 'ccw' : 'cw'), scalar(@$loop)
             if $Slic3r::debug;
     }