X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fp5-CGI-Ex;a=blobdiff_plain;f=lib%2FCGI%2FEx%2FValidate.pm;h=45c26f8c914dd86bec1a2cc9f7f4e23c011205df;hp=450fa2e55142a4bbca4fb99c9fb7597eaade3c89;hb=HEAD;hpb=6ab8b2e8e8388d1a238148a1ee58e124855f3768

diff --git a/lib/CGI/Ex/Validate.pm b/lib/CGI/Ex/Validate.pm
index 450fa2e..45c26f8 100644
--- a/lib/CGI/Ex/Validate.pm
+++ b/lib/CGI/Ex/Validate.pm
@@ -660,10 +660,11 @@ sub get_validation_keys {
 ###---------------------###
 
 sub generate_js {
+    my $self = shift;
+
     return "<!-- JS validation not supported in this browser $_ -->"
-        if $ENV{'HTTP_USER_AGENT'} && grep {$ENV{'HTTP_USER_AGENT'} =~ $_} @UNSUPPORTED_BROWSERS;
+        if $self->cgix->env->{'HTTP_USER_AGENT'} && grep {$self->cgix->env->{'HTTP_USER_AGENT'} =~ $_} @UNSUPPORTED_BROWSERS;
 
-    my $self = shift;
     my $val_hash = shift || croak "Missing validation hash";
     if (ref $val_hash ne 'HASH') {
         $val_hash = $self->get_validation($val_hash) if ref $val_hash ne 'SCALAR' || ! ref $val_hash;