From aa69ae11a84c500d3c76d808e625611b42684a44 Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Thu, 15 Jan 2015 22:37:55 +0100
Subject: [PATCH] Prune very short thin walls

---
 lib/Slic3r/Layer/PerimeterGenerator.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/Slic3r/Layer/PerimeterGenerator.pm b/lib/Slic3r/Layer/PerimeterGenerator.pm
index 20b7358fe..32e7257ad 100644
--- a/lib/Slic3r/Layer/PerimeterGenerator.pm
+++ b/lib/Slic3r/Layer/PerimeterGenerator.pm
@@ -136,7 +136,8 @@ sub process {
                         @thin_walls = @{offset2_ex($diff, -$min_width/2, +$min_width/2)};
         
                         # the maximum thickness of our thin wall area is equal to the minimum thickness of a single loop
-                        @thin_walls = map @{$_->medial_axis($pwidth + $pspacing, $min_width)}, @thin_walls;
+                        @thin_walls = grep $_->length > $pwidth*2,
+                            map @{$_->medial_axis($pwidth + $pspacing, $min_width)}, @thin_walls;
                         Slic3r::debugf "  %d thin walls detected\n", scalar(@thin_walls) if $Slic3r::debug;
         
                         if (0) {