From f1b1454b366289adf914d2bff0575139591cbbef Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Sat, 21 Jan 2012 11:51:31 +0100
Subject: [PATCH] Loops were not closing well

---
 lib/Slic3r/Extruder.pm        | 2 +-
 lib/Slic3r/Fill/Concentric.pm | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/Slic3r/Extruder.pm b/lib/Slic3r/Extruder.pm
index 35f6a3d47..4c88b97b8 100644
--- a/lib/Slic3r/Extruder.pm
+++ b/lib/Slic3r/Extruder.pm
@@ -85,7 +85,7 @@ sub extrude_loop {
     my $extrusion_path = $loop->split_at($start_at);
     
     # clip the path to avoid the extruder to get exactly on the first point of the loop
-    $extrusion_path->clip_end(scale $Slic3r::nozzle_diameter / 2);
+    $extrusion_path->clip_end(scale $Slic3r::flow_width * 0.15);
     
     # extrude along the path
     return $self->extrude_path($extrusion_path, $description);
diff --git a/lib/Slic3r/Fill/Concentric.pm b/lib/Slic3r/Fill/Concentric.pm
index f216f2759..5152062aa 100644
--- a/lib/Slic3r/Fill/Concentric.pm
+++ b/lib/Slic3r/Fill/Concentric.pm
@@ -59,7 +59,7 @@ sub fill_surface {
         my $path = $loop->split_at($cur_pos);
         
         # clip the path to avoid the extruder to get exactly on the first point of the loop
-        $path->clip_end(scale $Slic3r::nozzle_diameter / 2);
+        $path->clip_end(scale $Slic3r::flow_width * 0.15);
         
         push @paths, $path->points if @{$path->points};
     }