Merge pull request #1070 from metacpan/haarg/update-perltidy

Update Perl::Tidy and sync settings with metacpan-web

Author: mickeyn

.perltidyrc

@@ -1,10 +1,17 @@
--pbp
--nst
-
+--maximum-line-length=78
+--indent-columns=4
+--continuation-indentation=4
+--standard-error-output
+--vertical-tightness=2
+--closing-token-indentation=0
+--paren-tightness=1
+--brace-tightness=1
+--square-bracket-tightness=1
+--block-brace-tightness=1
+--nospace-for-semicolon
+--nooutdent-long-quotes
+--want-break-before="% + - * / x != == >= <= =~ !~ < > | & = **= += *= &= <<= &&= -= /= |= >>= ||= //= .= %= ^= x="
 # Break a line after opening/before closing token.
--vt=0
--vtc=0
-
-# Fix t/server/controller/login/pause.t tidyall failure
-# See https://github.com/autarch/Dist-Zilla-PluginBundle-DROLSKY/commit/b7f9c0194b83a72e4fe07ee5f9c541b6cfbf9b6d
---character-encoding=none
+--vertical-tightness=0
+--vertical-tightness-closing=0
+--weld-nested-containers

app.psgi

@@ -9,10 +9,10 @@ BEGIN {
 use lib "$root_dir/lib";
 
 use Config::ZOMG;
-use File::Path    ();
-use File::Spec    ();
-use Log::Log4perl ();
-use Path::Tiny qw( path );
+use File::Path            ();
+use File::Spec            ();
+use Log::Log4perl         ();
+use Path::Tiny            qw( path );
 use Plack::App::Directory ();
 use Plack::App::URLMap    ();
 

cpanfile

@@ -177,7 +177,7 @@ requires 'Module::Extract::Namespaces', '1.023';
 requires 'Module::Faker', '0.015';
 requires 'Module::Faker::Dist', '0.010';
 requires 'Perl::Critic', '0.140';
-requires 'Perl::Tidy' => '20220217';
+requires 'Perl::Tidy' => '== 20220613';
 requires 'Plack::Test::Agent', '1.5';
 requires 'PPI', '1.274'; # Perl::Critic
 requires 'PPIx::QuoteLike', '0.022'; # Perl::Critic

cpanfile.snapshot

@@ -5621,16 +5621,19 @@ DISTRIBUTIONS
       Test::More 0.66
       Test::Warn 0.21
       URI::Escape 3.28
-  Net-SSLeay-1.82
-    pathname: M/MI/MIKEM/Net-SSLeay-1.82.tar.gz
+  Net-SSLeay-1.92
+    pathname: C/CH/CHRISN/Net-SSLeay-1.92.tar.gz
     provides:
-      Net::SSLeay 1.82
-      Net::SSLeay::Handle 0.61
+      Net::SSLeay 1.92
+      Net::SSLeay::Handle 1.92
     requirements:
-      ExtUtils::MakeMaker 6.36
+      English 0
+      ExtUtils::MakeMaker 0
+      File::Spec::Functions 0
       MIME::Base64 0
-      Test::More 0.60_01
-      perl 5.005
+      Text::Wrap 0
+      constant 0
+      perl 5.008001
   Net-Twitter-4.01043
     pathname: M/MM/MMIMS/Net-Twitter-4.01043.tar.gz
     provides:
@@ -6545,29 +6548,30 @@ DISTRIBUTIONS
       strict 0
       version 0.77
       warnings 0
-  Perl-Tidy-20220217
-    pathname: S/SH/SHANCOCK/Perl-Tidy-20220217.tar.gz
-    provides:
-      Perl::Tidy 20220217
-      Perl::Tidy::Debugger 20220217
-      Perl::Tidy::DevNull 20220217
-      Perl::Tidy::Diagnostics 20220217
-      Perl::Tidy::FileWriter 20220217
-      Perl::Tidy::Formatter 20220217
-      Perl::Tidy::HtmlWriter 20220217
-      Perl::Tidy::IOScalar 20220217
-      Perl::Tidy::IOScalarArray 20220217
-      Perl::Tidy::IndentationItem 20220217
-      Perl::Tidy::LineBuffer 20220217
-      Perl::Tidy::LineSink 20220217
-      Perl::Tidy::LineSource 20220217
-      Perl::Tidy::Logger 20220217
-      Perl::Tidy::Tokenizer 20220217
-      Perl::Tidy::VerticalAligner 20220217
-      Perl::Tidy::VerticalAligner::Alignment 20220217
-      Perl::Tidy::VerticalAligner::Line 20220217
+  Perl-Tidy-20220613
+    pathname: S/SH/SHANCOCK/Perl-Tidy-20220613.tar.gz
+    provides:
+      Perl::Tidy 20220613
+      Perl::Tidy::Debugger 20220613
+      Perl::Tidy::DevNull 20220613
+      Perl::Tidy::Diagnostics 20220613
+      Perl::Tidy::FileWriter 20220613
+      Perl::Tidy::Formatter 20220613
+      Perl::Tidy::HtmlWriter 20220613
+      Perl::Tidy::IOScalar 20220613
+      Perl::Tidy::IOScalarArray 20220613
+      Perl::Tidy::IndentationItem 20220613
+      Perl::Tidy::LineBuffer 20220613
+      Perl::Tidy::LineSink 20220613
+      Perl::Tidy::LineSource 20220613
+      Perl::Tidy::Logger 20220613
+      Perl::Tidy::Tokenizer 20220613
+      Perl::Tidy::VerticalAligner 20220613
+      Perl::Tidy::VerticalAligner::Alignment 20220613
+      Perl::Tidy::VerticalAligner::Line 20220613
     requirements:
       ExtUtils::MakeMaker 0
+      perl 5.008
   PerlIO-gzip-0.20
     pathname: N/NW/NWCLARK/PerlIO-gzip-0.20.tar.gz
     provides:

lib/Catalyst/Action/Deserialize/MetaCPANSanitizedJSON.pm

@@ -2,7 +2,7 @@ package Catalyst::Action::Deserialize::MetaCPANSanitizedJSON;
 
 use Moose;
 use namespace::autoclean;
-use Try::Tiny qw( catch try );
+use Try::Tiny                        qw( catch try );
 use Cpanel::JSON::XS                 ();
 use MetaCPAN::Server::QuerySanitizer ();
 

lib/Catalyst/Plugin/OAuth2/Provider.pm

@@ -18,9 +18,9 @@ package Catalyst::Plugin::OAuth2::Provider::Controller;
 use Moose;
 BEGIN { extends 'Catalyst::Controller' }
 
-use Digest::SHA ();
+use Digest::SHA      ();
 use Cpanel::JSON::XS qw( decode_json encode_json );
-use URI ();
+use URI              ();
 
 has login   => ( is => 'ro' );
 has clients => ( is => 'ro' );
@@ -107,11 +107,9 @@ sub access_token : Local {
     $user->put( { refresh => 1 } );
 
     $c->res->content_type('application/json');
-    $c->res->body(
-        encode_json(
-            { access_token => $access_token, token_type => 'bearer' }
-        )
-    );
+    $c->res->body( encode_json(
+        { access_token => $access_token, token_type => 'bearer' }
+    ) );
 
 }
 

lib/MetaCPAN/API.pm

@@ -19,12 +19,12 @@ To run the api web server, run the following on one of the servers:
 
 use Mojo::Base 'Mojolicious';
 
-use Config::ZOMG ();
-use File::Temp   ();
-use List::Util qw( any );
+use Config::ZOMG             ();
+use File::Temp               ();
+use List::Util               qw( any );
 use MetaCPAN::Script::Runner ();
 use Search::Elasticsearch    ();
-use Try::Tiny qw( catch try );
+use Try::Tiny                qw( catch try );
 
 has es => sub {
     return Search::Elasticsearch->new(
@@ -90,12 +90,10 @@ sub _gen_index_task_sub {
         }
         catch {
             warn $_;
-            $job->fail(
-                {
-                    message => $_,
-                    @warnings ? ( warnings => \@warnings ) : (),
-                }
-            );
+            $job->fail( {
+                message => $_,
+                @warnings ? ( warnings => \@warnings ) : (),
+            } );
         };
     }
 }

lib/MetaCPAN/Document/Author.pm

@@ -7,8 +7,8 @@ use ElasticSearchX::Model::Document::Types qw(:all);
 use ElasticSearchX::Model::Document;
 
 # load order not important
-use Gravatar::URL ();
-use MetaCPAN::Types qw( Profile );
+use Gravatar::URL             ();
+use MetaCPAN::Types           qw( Profile );
 use MetaCPAN::Types::TypeTiny qw(
     ArrayRef
     ArrayRefPromote

lib/MetaCPAN/Document/Favorite/Set.pm

@@ -11,13 +11,11 @@ has query_favorite => (
     isa     => 'MetaCPAN::Query::Favorite',
     lazy    => 1,
     builder => '_build_query_favorite',
-    handles => [
-        qw< agg_by_distributions
-            by_user
-            leaderboard
-            recent
-            users_by_distribution >
-    ],
+    handles => [ qw< agg_by_distributions
+        by_user
+        leaderboard
+        recent
+        users_by_distribution > ],
 );
 
 sub _build_query_favorite {

lib/MetaCPAN/Document/File.pm

@@ -7,10 +7,10 @@ use utf8;
 use Moose;
 use ElasticSearchX::Model::Document;
 
-use List::AllUtils qw( any );
+use List::AllUtils             qw( any );
 use MetaCPAN::Document::Module ();
-use MetaCPAN::Types qw( Module );
-use MetaCPAN::Types::TypeTiny qw(
+use MetaCPAN::Types            qw( Module );
+use MetaCPAN::Types::TypeTiny  qw(
     ArrayRef
     Bool
     Int
@@ -21,9 +21,9 @@ use MetaCPAN::Types::TypeTiny qw(
     Str
 );
 use MetaCPAN::Util qw(numify_version);
-use Plack::MIME ();
-use Pod::Text   ();
-use Try::Tiny qw( catch try );
+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' );