[Catalyst-commits] r14521 - in CatalystX-CRUD/CatalystX-CRUD-Controller-REST/trunk: . lib/CatalystX/CRUD/Controller

[karpet at dev.catalyst.perl.org]

Author: karpet
Date: 2014-05-11 03:27:33 +0000 (Sun, 11 May 2014)
New Revision: 14521

Modified:
   CatalystX-CRUD/CatalystX-CRUD-Controller-REST/trunk/Changes
   CatalystX-CRUD/CatalystX-CRUD-Controller-REST/trunk/lib/CatalystX/CRUD/Controller/REST.pm
Log:
fix bug calling status_bad_request

Modified: CatalystX-CRUD/CatalystX-CRUD-Controller-REST/trunk/Changes
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD-Controller-REST/trunk/Changes	2014-05-11 03:26:29 UTC (rev 14520)
+++ CatalystX-CRUD/CatalystX-CRUD-Controller-REST/trunk/Changes	2014-05-11 03:27:33 UTC (rev 14521)
@@ -1,5 +1,8 @@
 Revision history for CatalystX-CRUD-Controller-REST
 
+0.004 xxx
+ - fix bug calling status_bad_request()
+
 0.003 01 Jan 2013
  - switch dependency from JSON::XS to JSON
 

Modified: CatalystX-CRUD/CatalystX-CRUD-Controller-REST/trunk/lib/CatalystX/CRUD/Controller/REST.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD-Controller-REST/trunk/lib/CatalystX/CRUD/Controller/REST.pm	2014-05-11 03:26:29 UTC (rev 14520)
+++ CatalystX-CRUD/CatalystX-CRUD-Controller-REST/trunk/lib/CatalystX/CRUD/Controller/REST.pm	2014-05-11 03:27:33 UTC (rev 14521)
@@ -8,7 +8,7 @@
     extends qw( Catalyst::Controller::REST CatalystX::CRUD );
 }
 
-our $VERSION = '0.003';
+our $VERSION = '0.004';
 
 __PACKAGE__->mk_accessors(
     qw(
@@ -576,7 +576,7 @@
     }
     my $req_data = $c->req->data;
     if ( !$req_data ) {
-        $c->status_bad_request( $c, message => 'Missing request data' );
+        $self->status_bad_request( $c, message => 'Missing request data' );
         return;
     }