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

[zarquon at dev.catalyst.perl.org]

Author: zarquon
Date: 2010-09-01 04:59:34 +0100 (Wed, 01 Sep 2010)
New Revision: 13564

Modified:
   trunk/Catalyst-Controller-reCAPTCHA/Changes
   trunk/Catalyst-Controller-reCAPTCHA/META.yml
   trunk/Catalyst-Controller-reCAPTCHA/lib/Catalyst/Controller/reCAPTCHA.pm
Log:
version 0.6 removed stupid unnecessary code idiom.  Thanks to ner0x

Modified: trunk/Catalyst-Controller-reCAPTCHA/Changes
===================================================================
--- trunk/Catalyst-Controller-reCAPTCHA/Changes	2010-08-30 05:29:30 UTC (rev 13563)
+++ trunk/Catalyst-Controller-reCAPTCHA/Changes	2010-09-01 03:59:34 UTC (rev 13564)
@@ -1,5 +1,6 @@
 # This file documents the revision history for the perl extension Catalyst::Controller::reCAPTCHA
-
+0.6 1 Sep 2010
+       - remove stupid $result->{is_valid} == $result->{is_valid} line (thanks ner0x)
 0.5 31 Mar 2010
         - fix RT 49603 Thanks Brian Philips and Castaway.
 0.4 Thu 18th June 2009

Modified: trunk/Catalyst-Controller-reCAPTCHA/META.yml
===================================================================
--- trunk/Catalyst-Controller-reCAPTCHA/META.yml	2010-08-30 05:29:30 UTC (rev 13563)
+++ trunk/Catalyst-Controller-reCAPTCHA/META.yml	2010-09-01 03:59:34 UTC (rev 13564)
@@ -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.5
+version: 0.6

Modified: trunk/Catalyst-Controller-reCAPTCHA/lib/Catalyst/Controller/reCAPTCHA.pm
===================================================================
--- trunk/Catalyst-Controller-reCAPTCHA/lib/Catalyst/Controller/reCAPTCHA.pm	2010-08-30 05:29:30 UTC (rev 13563)
+++ trunk/Catalyst-Controller-reCAPTCHA/lib/Catalyst/Controller/reCAPTCHA.pm	2010-09-01 03:59:34 UTC (rev 13564)
@@ -4,7 +4,7 @@
 use base 'Catalyst::Controller';
 use Captcha::reCAPTCHA;
 use Carp 'croak';
-our $VERSION = '0.5';
+our $VERSION = '0.6';
 
 
 sub captcha_get : Private {
@@ -46,8 +46,7 @@
             unless $result->{is_valid};
 
     $c->stash->{recaptcha_ok} = 1 if $result->{is_valid};
-    $result->{is_valid} == $result->{is_valid};
-    return $result->{is_valid};
+    return 1;
 }