Ran perltidy

[catagits/Catalyst-Action-REST.git] / lib / Catalyst / Action / Deserialize.pm

diff --git a/lib/Catalyst/Action/Deserialize.pm b/lib/Catalyst/Action/Deserialize.pm
index 2d778b4..2d5343f 100644 (file)
--- a/lib/Catalyst/Action/Deserialize.pm
+++ b/lib/Catalyst/Action/Deserialize.pm
@@ -19,35 +19,35 @@ sub execute {
     my $self = shift;
     my ( $controller, $c, $test ) = @_;
 
-    my $nreq = bless($c->request, 'Catalyst::Request::REST');
+    my $nreq = bless( $c->request, 'Catalyst::Request::REST' );
     $c->request($nreq);
 
-    unless(defined($self->plugins)) {
+    unless ( defined( $self->plugins ) ) {
         my $mpo = Module::Pluggable::Object->new(
-            'require' => 1,
-            'search_path' => [ 'Catalyst::Action::Deserialize' ],
+            'require'     => 1,
+            'search_path' => ['Catalyst::Action::Deserialize'],
         );
         my @plugins = $mpo->plugins;
-        $self->plugins(\@plugins);
+        $self->plugins( \@plugins );
     }
     my $content_type = $c->request->content_type;
-    my $sclass = 'Catalyst::Action::Deserialize::';
+    my $sclass       = 'Catalyst::Action::Deserialize::';
     my $sarg;
     my $map = $controller->serialize->{'map'};
-    if (exists($map->{$content_type})) {
+    if ( exists( $map->{$content_type} ) ) {
         my $mc;
-        if (ref($map->{$content_type}) eq "ARRAY") {
-            $mc = $map->{$content_type}->[0];
+        if ( ref( $map->{$content_type} ) eq "ARRAY" ) {
+            $mc   = $map->{$content_type}->[0];
             $sarg = $map->{$content_type}->[1];
         } else {
             $mc = $map->{$content_type};
         }
         $sclass .= $mc;
-        if (! grep(/^$sclass$/, @{$self->plugins})) {
+        if ( !grep( /^$sclass$/, @{ $self->plugins } ) ) {
             die "Cannot find plugin $sclass for $content_type!";
         }
     } else {
-        if (exists($controller->serialize->{'default'})) {
+        if ( exists( $controller->serialize->{'default'} ) ) {
             $sclass .= $controller->serialize->{'default'};
         } else {
             die "I cannot find a default serializer!";
@@ -55,17 +55,17 @@ sub execute {
     }
 
     my @demethods = qw(POST PUT OPTIONS);
-    my $method = $c->request->method;
-    if (grep /^$method$/, @demethods) {
-        if (defined($sarg)) {
-            $sclass->execute($controller, $c, $sarg);
+    my $method    = $c->request->method;
+    if ( grep /^$method$/, @demethods ) {
+        if ( defined($sarg) ) {
+            $sclass->execute( $controller, $c, $sarg );
         } else {
-            $sclass->execute($controller, $c);
+            $sclass->execute( $controller, $c );
         }
         $self->NEXT::execute( @_, );
     } else {
-        $self->NEXT::execute( @_ );
+        $self->NEXT::execute(@_);
     }
-};
+}
 
 1;