Remove XXX from dependencies

Build.PL

@@ -17,7 +17,6 @@ my $build = Module::Build->new(
         'Moo'                       => '0',
         'perl'                      => '5.10.0',
         'Time::HiRes'               => '0',
-        'XXX'                       => '0',
     },
     build_requires => {
         'Test::More' => '0.10',

lib/Slic3r/Extruder.pm

@@ -34,7 +34,6 @@ has 'speeds' => (
 );
 
 use Slic3r::Geometry qw(points_coincide PI X Y);
-use XXX;
 
 sub change_layer {
     my $self = shift;

lib/Slic3r/ExtrusionLoop.pm

@@ -1,7 +1,6 @@
 package Slic3r::ExtrusionLoop;
 use Moo;
 
-use XXX;
 
 # the underlying Slic3r::Polygon objects holds the geometry
 has 'polygon' => (

lib/Slic3r/ExtrusionPath.pm

@@ -2,7 +2,6 @@ package Slic3r::ExtrusionPath;
 use Moo;
 
 use Slic3r::Geometry qw(PI X Y epsilon deg2rad rotate_points);
-use XXX;
 
 # the underlying Slic3r::Polyline objects holds the geometry
 has 'polyline' => (

lib/Slic3r/ExtrusionPath/Collection.pm

@@ -1,7 +1,6 @@
 package Slic3r::ExtrusionPath::Collection;
 use Moo;
 
-use XXX;
 
 has 'paths' => (
     is      => 'rw',

lib/Slic3r/Fill.pm

@@ -15,7 +15,6 @@ use Slic3r::Fill::Rectilinear2;
 use Slic3r::Geometry qw(scale shortest_path);
 use Slic3r::Geometry::Clipper qw(union_ex diff_ex);
 
-use XXX;
 
 has 'print'     => (is => 'ro', required => 1);
 has 'fillers'   => (is => 'rw', default => sub { {} });

lib/Slic3r/Fill/Base.pm

@@ -1,7 +1,6 @@
 package Slic3r::Fill::Base;
 use Moo;
 
-use XXX;
 
 has 'print'               => (is => 'rw');
 has 'layer'               => (is => 'rw');

lib/Slic3r/Fill/Concentric.pm

@@ -4,7 +4,6 @@ use Moo;
 extends 'Slic3r::Fill::Base';
 
 use Slic3r::Geometry qw(scale unscale X1 Y1 X2 Y2);
-use XXX;
 
 sub fill_surface {
     my $self = shift;

lib/Slic3r/Fill/Honeycomb.pm

@@ -7,7 +7,6 @@ has 'cache' => (is => 'rw', default => sub {{}});
 
 use Slic3r::Geometry qw(PI X1 Y1 X2 Y2 X Y scale);
 use Slic3r::Geometry::Clipper qw(intersection_ex);
-use XXX;
 
 sub angles () { [0, PI/3, PI/3*2] }
 

lib/Slic3r/Fill/PlanePath.pm

@@ -4,7 +4,6 @@ use Moo;
 extends 'Slic3r::Fill::Base';
 
 use Slic3r::Geometry qw(scale bounding_box X1 Y1 X2 Y2);
-use XXX;
 
 sub multiplier () { 1 }
 

lib/Slic3r/Fill/Rectilinear.pm

@@ -4,7 +4,6 @@ use Moo;
 extends 'Slic3r::Fill::Base';
 
 use Slic3r::Geometry qw(X1 Y1 X2 Y2 A B X Y scale unscale epsilon);
-use XXX;
 
 sub fill_surface {
     my $self = shift;

lib/Slic3r/Fill/Rectilinear2.pm

@@ -4,7 +4,6 @@ use Moo;
 extends 'Slic3r::Fill::Base';
 
 use Slic3r::Geometry qw(scale X1 Y1 X2 Y2 A B X Y);
-use XXX;
 
 sub fill_surface {
     my $self = shift;

lib/Slic3r/Format/AMF.pm

@@ -2,7 +2,6 @@ package Slic3r::Format::AMF;
 use Moo;
 
 use Slic3r::Geometry qw(X Y Z);
-use XXX;
 
 sub read_file {
     my $self = shift;

lib/Slic3r/Format/AMF/Parser.pm

@@ -3,7 +3,6 @@ use strict;
 use warnings;
 
 use XML::SAX::PurePerl;
-use XXX;
 
 use base 'XML::SAX::Base';
 

lib/Slic3r/Format/STL.pm

@@ -2,7 +2,6 @@ package Slic3r::Format::STL;
 use Moo;
 
 use Slic3r::Geometry qw(X Y Z triangle_normal);
-use XXX;
 
 sub read_file {
     my $self = shift;

lib/Slic3r/Geometry.pm

@@ -22,7 +22,6 @@ our @EXPORT_OK = qw(
     polyline_remove_short_segments normal triangle_normal polygon_is_convex
 );
 
-use XXX;
 
 use constant PI => 4 * atan2(1, 1);
 use constant A => 0;

lib/Slic3r/Layer.pm

@@ -4,7 +4,6 @@ use Moo;
 use Math::Clipper ':all';
 use Slic3r::Geometry qw(scale collinear X Y A B PI rad2deg_dir bounding_box_center);
 use Slic3r::Geometry::Clipper qw(union_ex diff_ex intersection_ex xor_ex is_counter_clockwise);
-use XXX;
 
 # a sequential number of layer, starting at 0
 has 'id' => (

lib/Slic3r/Perimeter.pm

@@ -4,7 +4,6 @@ use Moo;
 use Math::Clipper ':all';
 use Slic3r::Geometry qw(X Y PI shortest_path scale unscale);
 use Slic3r::Geometry::Clipper qw(diff_ex);
-use XXX;
 
 sub make_perimeter {
     my $self = shift;

lib/Slic3r/Polyline.pm

@@ -5,7 +5,6 @@ use warnings;
 use Math::Clipper qw();
 use Slic3r::Geometry qw(A B polyline_remove_parallel_continuous_edges polyline_remove_acute_vertices
     move_points same_point);
-use XXX;
 
 # the constructor accepts an array(ref) of points
 sub new {

lib/Slic3r/Print.pm

@@ -6,7 +6,6 @@ use Math::ConvexHull 1.0.4 qw(convex_hull);
 use Slic3r::Geometry qw(X Y Z PI MIN MAX scale unscale move_points);
 use Slic3r::Geometry::Clipper qw(explode_expolygons safety_offset diff_ex intersection_ex
     union_ex offset JT_ROUND JT_MITER);
-use XXX;
 
 has 'x_length'          => (is => 'ro', required => 1);
 has 'y_length'          => (is => 'ro', required => 1);

lib/Slic3r/Skein.pm

@@ -5,7 +5,6 @@ use Config;
 use File::Basename qw(basename fileparse);
 use Slic3r::Geometry qw(PI unscale);
 use Time::HiRes qw(gettimeofday tv_interval);
-use XXX;
 
 # full path (relative or absolute) to the input file
 has 'input_file'    => (is => 'ro', required => 1);

lib/Slic3r/TriangleMesh.pm

@@ -2,7 +2,6 @@ package Slic3r::TriangleMesh;
 use Moo;
 
 use Slic3r::Geometry qw(X Y Z A B unscale same_point);
-use XXX;
 
 # public
 has 'vertices'      => (is => 'ro', required => 1);         # id => [ [$x1,$y1],[$x2,$y2],[$x3,$y3] ]

slic3r.pl

@@ -10,7 +10,6 @@ BEGIN {
 
 use Getopt::Long qw(:config no_auto_abbrev);
 use Slic3r;
-use XXX;
 $|++;
 
 my %opt = ();

t/stl.t

@@ -11,7 +11,6 @@ BEGIN {
 
 use Slic3r;
 use Slic3r::Geometry qw(X Y Z A B);
-use XXX;
 
 my @lines;
 my $z = 20;