Move session->env->getIp into session->request->address

2010-07-01 13:11:01 -07:00 · 2010-07-01 13:11:01 -07:00 · 005b9da1ac
commit 005b9da1ac
parent 565cf955d7
20 changed files with 49 additions and 48 deletions
--- a/lib/WebGUI/Form/Captcha.pm
+++ b/lib/WebGUI/Form/Captcha.pm
@ -111,7 +111,7 @@ sub getValue {
        my $ua = LWP::UserAgent->new;
        my $res = $ua->post('http://api-verify.recaptcha.net/verify', {
            privatekey  => $privKey,
-            remoteip    => $self->session->env->getIp,
+            remoteip    => $self->session->request->env->{REMOTE_ADDR},
            challenge   => $challenge,
            response    => $response,
        });