From 079f6072a6d4b58e84b8dc2127d1f39a6f66cfff Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Tue, 10 Jul 2012 19:31:09 +0200
Subject: [PATCH] Use M109 P1 for Teacup
---
lib/Slic3r/GCode.pm | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/lib/Slic3r/GCode.pm b/lib/Slic3r/GCode.pm
index ec1b535f2..838a09a16 100644
--- a/lib/Slic3r/GCode.pm
+++ b/lib/Slic3r/GCode.pm
@@ -428,7 +428,9 @@ sub set_bed_temperature {
my ($temperature, $wait) = @_;
my ($code, $comment) = $wait
- ? (($Slic3r::gcode_flavor eq 'makerbot' ? 'M109' : 'M190'), 'wait for bed temperature to be reached')
+ ? (($Slic3r::gcode_flavor eq 'makerbot' ? 'M109'
+ : $Slic3r::gcode_flavor eq 'teacup' ? 'M109 P1'
+ : '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;