precious tidy

Author: oalders

lib/MetaCPAN/API.pm

@@ -22,7 +22,6 @@ use Mojo::Base 'Mojolicious';
 use File::Temp                ();
 use List::Util                qw( any );
 use MetaCPAN::Script::Runner  ();
-use Search::Elasticsearch     ();
 use Try::Tiny                 qw( catch try );
 use MetaCPAN::Server::Config  ();
 use MetaCPAN::Types::TypeTiny qw( ES );

lib/MetaCPAN/Document/Author.pm

@@ -7,10 +7,9 @@ use ElasticSearchX::Model::Document::Types qw( Location );
 use ElasticSearchX::Model::Document;
 
 # load order not important
-use Gravatar::URL                       ();
-use MetaCPAN::Document::Author::Profile ();
-use MetaCPAN::Types                     qw( ESBool Profile );
-use MetaCPAN::Types::TypeTiny           qw(
+use Gravatar::URL             ();
+use MetaCPAN::Types           qw( ESBool Profile );
+use MetaCPAN::Types::TypeTiny qw(
     ArrayRef
     ArrayRefPromote
     Blog

lib/MetaCPAN/Document/File.pm

@@ -10,19 +10,11 @@ use ElasticSearchX::Model::Document;
 use List::Util                 qw( any );
 use MetaCPAN::Document::Module ();
 use MetaCPAN::Types            qw( ESBool Module );
-use MetaCPAN::Types::TypeTiny  qw(
-    ArrayRef
-    Int
-    Maybe
-    Num
-    ScalarRef
-    Stat
-    Str
-);
-use MetaCPAN::Util qw(numify_version true false);
-use Plack::MIME    ();
-use Pod::Text      ();
-use Try::Tiny      qw( catch try );
+use MetaCPAN::Types::TypeTiny qw( ArrayRef Int Maybe Num ScalarRef Stat Str );
+use MetaCPAN::Util            qw(numify_version true false);
+use Plack::MIME               ();
+use Pod::Text                 ();
+use Try::Tiny                 qw( catch try );
 
 Plack::MIME->add_type( '.t'   => 'text/x-script.perl' );
 Plack::MIME->add_type( '.pod' => 'text/x-pod' );

lib/MetaCPAN/Document/Release.pm

@@ -3,9 +3,8 @@ package MetaCPAN::Document::Release;
 use Moose;
 
 use ElasticSearchX::Model::Document;
-use MetaCPAN::Document::Dependency ();
-use MetaCPAN::Types                qw( ESBool Dependency );
-use MetaCPAN::Types::TypeTiny      qw(
+use MetaCPAN::Types           qw( Dependency ESBool );
+use MetaCPAN::Types::TypeTiny qw(
     ArrayRef
     HashRefCPANMeta
     Num

lib/MetaCPAN/Model.pm

@@ -5,7 +5,7 @@ use Moose;
 
 use ElasticSearchX::Model;
 use MetaCPAN::ESConfig qw(es_config);
-use Module::Runtime    qw(require_module use_package_optimistically);
+use Module::Runtime    qw( require_module use_package_optimistically );
 
 my %indexes;
 my $docs = es_config->documents;

lib/MetaCPAN/Model/User/Account.pm

@@ -6,10 +6,9 @@ use warnings;
 use Moose;
 use ElasticSearchX::Model::Document;
 
-use MetaCPAN::Model::User::Identity ();
-use MetaCPAN::Types                 qw( ESBool Identity );
-use MetaCPAN::Types::TypeTiny       qw( ArrayRef Dict Str );
-use MetaCPAN::Util                  qw(true false);
+use MetaCPAN::Types           qw( Identity );
+use MetaCPAN::Types::TypeTiny qw( ArrayRef Dict Str );
+use MetaCPAN::Util            qw(true false);
 
 =head1 PROPERTIES
 

lib/MetaCPAN/Query/Search.pm

@@ -2,13 +2,12 @@ package MetaCPAN::Query::Search;
 
 use MetaCPAN::Moose;
 
-use Const::Fast               qw( const );
-use Hash::Merge               qw( merge );
-use List::Util                qw( min uniq );
-use Log::Contextual           qw( :log :dlog );
-use MetaCPAN::ESConfig        qw( es_doc_path );
-use MetaCPAN::Types::TypeTiny qw( Object Str );
-use MetaCPAN::Util            qw( MAX_RESULT_WINDOW hit_total true false );
+use Const::Fast        qw( const );
+use Hash::Merge        qw( merge );
+use List::Util         qw( min uniq );
+use Log::Contextual    qw( :log :dlog );
+use MetaCPAN::ESConfig qw( es_doc_path );
+use MetaCPAN::Util     qw( MAX_RESULT_WINDOW hit_total true false );
 use MooseX::StrictConstructor;
 
 with 'MetaCPAN::Query::Role::Common';

lib/MetaCPAN/Script/Backup.pm

@@ -8,7 +8,7 @@ use Cpanel::JSON::XS          qw( decode_json encode_json );
 use DateTime                  ();
 use IO::Zlib                  ();
 use Log::Contextual           qw( :log :dlog );
-use MetaCPAN::Types::TypeTiny qw( Bool Int Path Str CommaSepOption );
+use MetaCPAN::Types::TypeTiny qw( Bool CommaSepOption Int Path Str );
 use MetaCPAN::Util            qw( true false );
 use MetaCPAN::ESConfig        qw( es_config );
 use Moose;

lib/MetaCPAN/Script/Contributor.pm

@@ -5,9 +5,7 @@ use warnings;
 
 use Moose;
 
-use MetaCPAN::ESConfig qw( es_doc_path );
-use Log::Contextual    qw( :log );
-use Ref::Util          qw( is_arrayref );
+use Log::Contextual qw( :log );
 
 use MetaCPAN::Types::TypeTiny qw( Bool HashRef Int Str );
 

lib/MetaCPAN/Script/Role/Contributor.pm

@@ -5,7 +5,7 @@ use Moose::Role;
 use Log::Contextual    qw( :log :dlog );
 use MetaCPAN::ESConfig qw( es_doc_path );
 use MetaCPAN::Util     qw( true false );
-use Ref::Util          qw( is_arrayref );
+use Ref::Util          ();
 
 sub update_contributors {
     my ( $self, $query ) = @_;