X-Git-Url: https://git.dogcows.com/gitweb?a=blobdiff_plain;f=lib%2FCGI%2FEx%2FValidate.pm;h=146a10edb728aff7046f73ff042cf811ae924bc7;hb=18123183bfb2737ea337306c9d705fca5b5e50d6;hp=35f717600b3036f9fad32c09393c0c21a7965b89;hpb=6c57b3331d84010b9e2031f8e3c8937c3117e8fc;p=chaz%2Fp5-CGI-Ex

diff --git a/lib/CGI/Ex/Validate.pm b/lib/CGI/Ex/Validate.pm
index 35f7176..146a10e 100644
--- a/lib/CGI/Ex/Validate.pm
+++ b/lib/CGI/Ex/Validate.pm
@@ -22,7 +22,7 @@ use vars qw($VERSION
             @UNSUPPORTED_BROWSERS
             );
 
-$VERSION = '2.11';
+$VERSION = '2.18';
 
 $DEFAULT_EXT   = 'val';
 $QR_EXTRA      = qr/^(\w+_error|as_(array|string|hash)_\w+|no_\w+)/;
@@ -120,6 +120,7 @@ sub validate {
             push @$fields, { %{$val_hash->{$field}}, field => $field };
         }
     }
+    return if ! $fields;
 
     ### Finally we have our arrayref of hashrefs that each have their 'field' key
     ### now lets do the validation
@@ -2079,14 +2080,12 @@ javascript didn't validate correctly, the user can still submit the data.
 Thanks to Eamon Daly for providing bug fixes for bugs in validate.js
 caused by HTML::Prototype.
 
-=head1 AUTHOR
-
-Paul Seamons
-
 =head1 LICENSE
 
 This module may be distributed under the same terms as Perl itself.
 
-=cut
+=head1 AUTHOR
 
+Paul Seamons <perl at seamons dot com>
 
+=cut