Skip to content

Instantly share code, notes, and snippets.

@perlDreamer
Created July 1, 2010 18:21
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
Star You must be signed in to star a gist
Save perlDreamer/460340 to your computer and use it in GitHub Desktop.
diff --git a/lib/WebGUI/Form/Captcha.pm b/lib/WebGUI/Form/Captcha.pm
index 21fab77..a0130a1 100644
--- 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,
});
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment