From 5eb19820814670ad21f77b3149f07f9f3a12bcb0 Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Sat, 30 Jun 2012 16:14:45 +0200
Subject: [PATCH] Bugfix: brim was extruded multiple times when sequential
 printing was enabled

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

diff --git a/lib/Slic3r/Print.pm b/lib/Slic3r/Print.pm
index ed5964bc65..66a2ffd25e 100644
--- a/lib/Slic3r/Print.pm
+++ b/lib/Slic3r/Print.pm
@@ -550,6 +550,7 @@ sub write_gcode {
     
     # prepare the logic to print one layer
     my $skirt_done = 0;  # count of skirt layers done
+    my $brim_done = 0;
     my $extrude_layer = sub {
         my ($layer_id, $object_copies) = @_;
         my $gcode = "";
@@ -580,8 +581,9 @@ sub write_gcode {
         }
         
         # extrude brim
-        if ($layer_id == 0) {
+        if ($layer_id == 0 && !$brim_done) {
             $gcode .= $gcodegen->extrude_loop($_, 'brim') for @{$self->brim};
+            $brim_done = 1;
         }
         
         for my $obj_copy (@$object_copies) {