From 4db416773c61e8d78fb05ae42be381a8c1914b3e Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Tue, 29 May 2012 09:40:42 +0200
Subject: [PATCH] Fixed typos in bed temperature M-codes. #386

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

diff --git a/lib/Slic3r/Extruder.pm b/lib/Slic3r/Extruder.pm
index 06886b55..d120a740 100644
--- a/lib/Slic3r/Extruder.pm
+++ b/lib/Slic3r/Extruder.pm
@@ -395,8 +395,8 @@ sub set_bed_temperature {
     my ($temperature, $wait) = @_;
     
     my ($code, $comment) = $wait
-        ? (($Slic3r::gcode_flavor eq 'makerbot' ? '109' : '190'), 'wait for bed temperature to be reached')
-        : ('M40', 'set bed temperature');
+        ? (($Slic3r::gcode_flavor eq 'makerbot' ? 'M109' : 'M190'), 'wait for bed temperature to be reached')
+        : ('M140', 'set bed temperature');
     return sprintf "$code %s%d ; $comment\n",
         ($Slic3r::gcode_flavor eq 'mach3' ? 'P' : 'S'), $temperature;
 }