Infill is now overlapped with perimeters by 15%. #19

lib/Slic3r.pm

@@ -62,6 +62,7 @@ our $flow_width;
 our $perimeter_offsets  = 3;
 our $solid_layers       = 3;
 our $bridge_overlap     = 3;    # mm
+our $perimeter_infill_overlap_ratio = 0.15;   # factor for flow width
 our $fill_pattern       = 'rectilinear';
 our $solid_fill_pattern = 'rectilinear';
 our $fill_density       = 0.4;  # 1 = 100%

lib/Slic3r/Perimeter.pm

@@ -51,6 +51,7 @@ sub make_perimeter {
         
         # create one more offset to be used as boundary for fill
         {
+            $distance -= $Slic3r::flow_width * $Slic3r::perimeter_infill_overlap_ratio / $Slic3r::resolution;
             my @fill_surfaces = map Slic3r::Surface->cast_from_expolygon
                 ($_, surface_type => $surface->surface_type),
                 map $_->offset(-$distance), @last_offsets;

lib/Slic3r/STL.pm

@@ -138,7 +138,7 @@ sub _facet {
 sub intersect_facet {
     my $self = shift;
     my ($vertices, $z) = @_;
-    printf "Slicing at $z\n";
+    
     # build the three segments of the triangle facet
     my @edges = (
         [ $vertices->[0], $vertices->[1] ],