[Catalyst-commits] r13113 - in trunk/Catalyst-Controller-reCAPTCHA: . lib/Catalyst/Controller

[zarquon at dev.catalyst.perl.org]

Author: zarquon
Date: 2010-03-31 11:40:38 +0100 (Wed, 31 Mar 2010)
New Revision: 13113

Modified:
   trunk/Catalyst-Controller-reCAPTCHA/Changes
   trunk/Catalyst-Controller-reCAPTCHA/META.yml
   trunk/Catalyst-Controller-reCAPTCHA/lib/Catalyst/Controller/reCAPTCHA.pm
Log:
version 0.5

Modified: trunk/Catalyst-Controller-reCAPTCHA/Changes
===================================================================
--- trunk/Catalyst-Controller-reCAPTCHA/Changes	2010-03-30 12:35:17 UTC (rev 13112)
+++ trunk/Catalyst-Controller-reCAPTCHA/Changes	2010-03-31 10:40:38 UTC (rev 13113)
@@ -1,5 +1,7 @@
 # This file documents the revision history for the perl extension Catalyst::Controller::reCAPTCHA
 
+0.5 31 Mar 2010
+        - fix RT 49603 Thanks Brian Philips and Castaway.
 0.4 Thu 18th June 2009
         - Doc fixes
 0.31

Modified: trunk/Catalyst-Controller-reCAPTCHA/META.yml
===================================================================
--- trunk/Catalyst-Controller-reCAPTCHA/META.yml	2010-03-30 12:35:17 UTC (rev 13112)
+++ trunk/Catalyst-Controller-reCAPTCHA/META.yml	2010-03-31 10:40:38 UTC (rev 13113)
@@ -11,7 +11,7 @@
 configure_requires:
   ExtUtils::MakeMaker: 6.42
 distribution_type: module
-generated_by: 'Module::Install version 0.880'
+generated_by: 'Module::Install version 0.91'
 license: perl
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -27,4 +27,4 @@
 resources:
   license: http://dev.perl.org/licenses/
   repository: http://dev.catalyst.perl.org/repos/Catalyst/trunk/Catalyst-Controller-reCAPTCHA/
-version: 0.4
+version: 0.5

Modified: trunk/Catalyst-Controller-reCAPTCHA/lib/Catalyst/Controller/reCAPTCHA.pm
===================================================================
--- trunk/Catalyst-Controller-reCAPTCHA/lib/Catalyst/Controller/reCAPTCHA.pm	2010-03-30 12:35:17 UTC (rev 13112)
+++ trunk/Catalyst-Controller-reCAPTCHA/lib/Catalyst/Controller/reCAPTCHA.pm	2010-03-31 10:40:38 UTC (rev 13113)
@@ -4,7 +4,7 @@
 use base 'Catalyst::Controller';
 use Captcha::reCAPTCHA;
 use Carp 'croak';
-our $VERSION = '0.4';
+our $VERSION = '0.5';
 
 
 sub captcha_get : Private {
@@ -46,7 +46,8 @@
             unless $result->{is_valid};
 
     $c->stash->{recaptcha_ok} = 1 if $result->{is_valid};
-    return ($result->{is_valid} == $result->{is_valid});
+    $result->{is_valid} == $result->{is_valid};
+    return $result->{is_valid};
 }