From 3ed5171d20f6a55faaefd719712665ff003b9e94 Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Tue, 1 May 2012 11:48:22 +0200
Subject: [PATCH] Take bottom layer speed ratio into account when estimating
 layer time. #334

---
 lib/Slic3r/Extruder.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lib/Slic3r/Extruder.pm b/lib/Slic3r/Extruder.pm
index ce4b706bb..b1d6b62e6 100644
--- a/lib/Slic3r/Extruder.pm
+++ b/lib/Slic3r/Extruder.pm
@@ -164,7 +164,9 @@ sub extrude_path {
     }
     
     if ($Slic3r::cooling) {
-        $self->elapsed_time($self->elapsed_time + (unscale($path_length) / $self->speeds->{$self->last_speed} * 60));
+        my $path_time = unscale($path_length) / $self->speeds->{$self->last_speed} * 60;
+        $path_time /= $Slic3r::bottom_layer_speed_ratio if $self->layer->id == 0;
+        $self->elapsed_time($self->elapsed_time + $path_time);
     }
     
     return $gcode;