From 0bff8ad576e80c5f23851736b0b953d43f543b69 Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Mon, 5 Nov 2012 15:59:31 +0100
Subject: [PATCH] Bugfix: some multimaterial files generated a fatal error

---
 lib/Slic3r/Layer.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/lib/Slic3r/Layer.pm b/lib/Slic3r/Layer.pm
index 18169fd1..0a0213a0 100644
--- a/lib/Slic3r/Layer.pm
+++ b/lib/Slic3r/Layer.pm
@@ -72,12 +72,13 @@ sub region {
     my $self = shift;
     my ($region_id) = @_;
     
-    if (!defined $self->regions->[$region_id]) {
-        $self->regions->[$region_id] = Slic3r::Layer::Region->new(
+    for (my $i = @{$self->regions}; $i <= $region_id; $i++) {
+        $self->regions->[$i] //= Slic3r::Layer::Region->new(
             layer   => $self,
-            region  => $self->object->print->regions->[$region_id],
+            region  => $self->object->print->regions->[$i],
         );
     }
+    
     return $self->regions->[$region_id];
 }