Removed some dependencies on Perl IO module.
This commit is contained in:
parent
a38cbac312
commit
e162c47167
@ -7,7 +7,6 @@ require Exporter;
|
|||||||
our @ISA = qw(Exporter);
|
our @ISA = qw(Exporter);
|
||||||
our @EXPORT_OK = qw(_eq);
|
our @EXPORT_OK = qw(_eq);
|
||||||
|
|
||||||
use IO::Scalar;
|
|
||||||
use List::Util qw(first);
|
use List::Util qw(first);
|
||||||
use Slic3r::Geometry qw(epsilon X Y Z);
|
use Slic3r::Geometry qw(epsilon X Y Z);
|
||||||
|
|
||||||
|
1
t/svg.t
1
t/svg.t
@ -10,6 +10,7 @@ BEGIN {
|
|||||||
|
|
||||||
use Slic3r;
|
use Slic3r;
|
||||||
use Slic3r::Test;
|
use Slic3r::Test;
|
||||||
|
use IO::Scalar;
|
||||||
|
|
||||||
{
|
{
|
||||||
my $print = Slic3r::Test::init_print('20mm_cube');
|
my $print = Slic3r::Test::init_print('20mm_cube');
|
||||||
|
@ -11,7 +11,6 @@ BEGIN {
|
|||||||
}
|
}
|
||||||
|
|
||||||
use Getopt::Long qw(:config no_auto_abbrev);
|
use Getopt::Long qw(:config no_auto_abbrev);
|
||||||
use IO::All;
|
|
||||||
use List::Util qw(max);
|
use List::Util qw(max);
|
||||||
use Slic3r;
|
use Slic3r;
|
||||||
use Slic3r::Geometry qw(X Y);
|
use Slic3r::Geometry qw(X Y);
|
||||||
|
Loading…
Reference in New Issue
Block a user