From 9caf536aca6bb55364603bd95376c2a8d629ee6a Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Wed, 18 Sep 2013 18:49:19 +0200
Subject: [PATCH] Finished a basic implementation of --standby-temperature

---
 lib/Slic3r/GCode.pm | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/lib/Slic3r/GCode.pm b/lib/Slic3r/GCode.pm
index 5371cd9532..ce6702ad56 100644
--- a/lib/Slic3r/GCode.pm
+++ b/lib/Slic3r/GCode.pm
@@ -663,6 +663,14 @@ sub set_extruder {
         });
     }
     
+    # set the current extruder to the standby temperature
+    if ($self->config->standby_temperature && defined $self->extruder) {
+        my $temp = defined $self->layer && $self->layer->id == 0
+            ? $self->extruder->first_layer_temperature
+            : $self->extruder->temperature;
+        $gcode .= $self->set_temperature($temp + $self->config->standby_temperature_delta, 1);
+    }
+    
     # set the new extruder
     $self->extruder($extruder);
     $gcode .= sprintf "%s%d%s\n", 
@@ -676,6 +684,14 @@ sub set_extruder {
     
     $gcode .= $self->reset_e;
     
+    # set the new extruder to the operating temperature
+    if ($self->config->standby_temperature) {
+        my $temp = defined $self->layer && $self->layer->id == 0
+            ? $self->extruder->first_layer_temperature
+            : $self->extruder->temperature;
+        $gcode .= $self->set_temperature($temp, 1);
+    }
+    
     return $gcode;
 }