Fixed dragging in 3D plater having some glitches with multipart objects

slic3r · Mar 19, 2016 · bdf00cb · bdf00cb
1 parent f8c8342
commit bdf00cb
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/lib/Slic3r/GUI/Plater/3D.pm b/lib/Slic3r/GUI/Plater/3D.pm
@@ -39,10 +39,14 @@ sub new {
     $self->on_move(sub {
         my @volume_idxs = @_;
 
+        my %done = ();  # prevent moving instances twice
         foreach my $volume_idx (@volume_idxs) {
             my $volume = $self->volumes->[$volume_idx];
             my $obj_idx = $self->object_idx($volume_idx);
             my $instance_idx = $self->instance_idx($volume_idx);
+            next if $done{"${obj_idx}_${instance_idx}"};
+            $done{"${obj_idx}_${instance_idx}"} = 1;
+
             my $model_object = $self->{model}->get_object($obj_idx);
             $model_object
                 ->instances->[$instance_idx]