Merge pull request #3301 from metacpan/oalders/tidy

perltidy

Author: haarg

lib/MetaCPAN/Web/API/RequestInfo/Orchestrator.pm

@@ -113,7 +113,8 @@ sub _via_release {
     my $model = $self->model;
 
     Future->wait_all(
-        $model->get( $author, $release )->then( \&_fail_without_release )
+        $model->get( $author, $release )
+            ->then( \&_fail_without_release )
             ->then( sub {
             my $data         = shift;
             my $release_data = $data->{release};

lib/MetaCPAN/Web/Controller/Author.pm

@@ -87,7 +87,8 @@ sub releases : Chained('root') PathPart Args(0) {
     my $page      = $req->page;
     my $author_cv = $c->model('API::Author')->get($id);
     my $releases
-        = $c->model('API::Release')->all_by_author( $id, $page, $page_size )
+        = $c->model('API::Release')
+        ->all_by_author( $id, $page, $page_size )
         ->get;
 
     my $author_info = $author_cv->get;

lib/MetaCPAN/Web/Controller/ContributingDoc.pm

@@ -32,7 +32,8 @@ sub get : Private {
 
     my $contributing_re = qr/CONTRIBUTING|HACKING/i;
     my $files
-        = $c->model('API::Release')->interesting_files( $author, $release )
+        = $c->model('API::Release')
+        ->interesting_files( $author, $release )
         ->get->{files};
 
     my $file = List::Util::first { $_->{name} =~ /$contributing_re/ } @$files;

lib/MetaCPAN/Web/Controller/Feed.pm

@@ -39,7 +39,8 @@ sub recent : Private {
     my $changes
         = $c->model('API::Changes')
         ->by_releases(
-        [ map "$_->{author}/$_->{name}", @{ $c->stash->{recent} } ] )->get;
+        [ map "$_->{author}/$_->{name}", @{ $c->stash->{recent} } ] )
+        ->get;
 
     for ( @{ $c->stash->{recent} } ) {
 

lib/MetaCPAN/Web/Controller/Lab.pm

@@ -61,7 +61,9 @@ sub dashboard : Local : Args(1) {
 
     my $report;
     if ($pauseid) {
-        $report = $c->model('API::Lab')->fetch_latest_distros( 300, $pauseid )
+        $report
+            = $c->model('API::Lab')
+            ->fetch_latest_distros( 300, $pauseid )
             ->get;
     }
 

lib/MetaCPAN/Web/Controller/Recent.pm

@@ -12,7 +12,8 @@ sub index : Path : Args(0) {
 
     my $filter = $req->params->{f} || 'l';
     my ($data)
-        = $c->model('API::Release')->recent( $page, $page_size, $filter )
+        = $c->model('API::Release')
+        ->recent( $page, $page_size, $filter )
         ->get;
 
     $c->add_surrogate_key( 'RECENT', 'DIST_UPDATES' );

lib/MetaCPAN/Web/Controller/Recent/TopUploaders.pm

@@ -28,7 +28,8 @@ sub topuploaders : Private {
     my $data = $c->model('API::Release')->topuploaders($range)->get;
 
     my $authors
-        = $c->model('API::Author')->get_multiple( keys %{ $data->{counts} } )
+        = $c->model('API::Author')
+        ->get_multiple( keys %{ $data->{counts} } )
         ->get;
 
     $c->stash( {

lib/MetaCPAN/Web/Controller/Requires.pm

@@ -30,7 +30,8 @@ sub distribution : Chained('/dist/root') PathPart('requires') Args(0)
 
     my $data
         = $c->model('API::Release')
-        ->reverse_dependencies( $dist, $page, $page_size, $sort )->get;
+        ->reverse_dependencies( $dist, $page, $page_size, $sort )
+        ->get;
 
     my $pageset = Data::Pageset->new( {
         current_page     => $page,
@@ -59,7 +60,8 @@ sub module : Chained('/module/root') PathPart('requires') Args(0)
 
     my $data
         = $c->model('API::Module')
-        ->requires( $module, $page, $page_size, $sort )->get;
+        ->requires( $module, $page, $page_size, $sort )
+        ->get;
 
     my $pageset = Data::Pageset->new( {
         current_page     => $page,

lib/MetaCPAN/Web/Model/API/Author.pm

@@ -77,7 +77,7 @@ sub get_multiple {
             $data->{authors} = [ @authors{@authors} ];
             $data;
         }
-    )->then( \&_filter_authors );
+        )->then( \&_filter_authors );
 }
 
 sub search {

lib/MetaCPAN/Web/Model/API/Permission.pm

@@ -120,8 +120,10 @@ sub _add_email_to_notification {
 
 sub get_notification_info {
     my ( $self, $module ) = @_;
-    $self->by_module($module)->then( $self->_permissions_to_notification )
-        ->then( $self->_add_email_to_notification )->then( sub {
+    $self->by_module($module)
+        ->then( $self->_permissions_to_notification )
+        ->then( $self->_add_email_to_notification )
+        ->then( sub {
         my $data = shift;
         Future->done( {
             took         => $data->{took},