3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-08-08 06:24:01 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

Fixed one more regression introduced with Model refactoring. Includes regression test

Browse source
This commit is contained in:
Alessandro Ranellucci 2014-05-15 16:37:18 +02:00
parent dd1183f19a
commit ad99b2a0fd
4 changed files with 24 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

18
xs/t/19_model.t Normal file
View file

@ -0,0 +1,18 @@
#!/usr/bin/perl
use strict;
use warnings;
use Slic3r::XS;
use Test::More tests => 3;
{
my $model = Slic3r::Model->new;
my $object = $model->_add_object;
isa_ok $object, 'Slic3r::Model::Object::Ref';
isa_ok $object->origin_translation, 'Slic3r::Pointf::Ref';
$object->origin_translation->translate(10,0);
is_deeply \@{$object->origin_translation}, [10,0], 'origin_translation is modified by ref';
}
__END__