From 806e59facc640da96559216db326e54c86dbc212 Mon Sep 17 00:00:00 2001
From: bubnikv <bubnikv@gmail.com>
Date: Wed, 24 Oct 2018 17:20:15 +0200
Subject: [PATCH] Fix of Perl unit tests.

---
 src/libslic3r/Print.cpp | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/libslic3r/Print.cpp b/src/libslic3r/Print.cpp
index 6253f4e89..f87d7d309 100644
--- a/src/libslic3r/Print.cpp
+++ b/src/libslic3r/Print.cpp
@@ -407,9 +407,12 @@ void Print::add_model_object(ModelObject* model_object, int idx)
     } else
         m_objects.emplace_back(object);
     // Invalidate all print steps.
-    //FIXME lock mutex!
     this->invalidate_all_steps();
 
+    // Set the transformation matrix without translation from the first instance.
+    if (! model_object->instances.empty())
+        object->set_trafo(model_object->instances.front()->world_matrix(true));
+
     size_t volume_id = 0;
     for (const ModelVolume *volume : model_object->volumes) {
         if (! volume->is_model_part() && ! volume->is_modifier())