small parameter match fix
Robert 'phaylon' Sedlacek [Thu, 1 Apr 2010 18:58:45 +0000 (02:58 +0800)]
lib/CatalystX/Declare/Action/CatchValidationError.pm

index 34e168e..ff993e3 100644 (file)
@@ -38,8 +38,6 @@ role CatalystX::Declare::Action::CatchValidationError {
 
             for my $key (@$named) {
 
-                next unless exists $ctx->request->params->{ $key };
-
                 my $value = $ctx->request->params->{ $key };
                 my $tc    = $tcs->{ $key };
                 
@@ -51,6 +49,10 @@ role CatalystX::Declare::Action::CatchValidationError {
                     $value = [$value]
                         unless is_ArrayRef $value;
                 }
+                else {
+                    
+                    next unless exists $ctx->request->params->{ $key };
+                }
 
                 $extracted{ $key } = $value;
             }