Version 0.98 0.98
Tomas Doran [Tue, 21 Feb 2012 11:41:26 +0000 (11:41 +0000)]
29 files changed:
Changes
lib/Catalyst/Action/Deserialize.pm
lib/Catalyst/Action/Deserialize/Callback.pm
lib/Catalyst/Action/Deserialize/Data/Serializer.pm
lib/Catalyst/Action/Deserialize/JSON.pm
lib/Catalyst/Action/Deserialize/View.pm
lib/Catalyst/Action/Deserialize/XML/Simple.pm
lib/Catalyst/Action/Deserialize/YAML.pm
lib/Catalyst/Action/DeserializeMultiPart.pm
lib/Catalyst/Action/REST.pm
lib/Catalyst/Action/REST/ForBrowsers.pm
lib/Catalyst/Action/Serialize.pm
lib/Catalyst/Action/Serialize/Callback.pm
lib/Catalyst/Action/Serialize/Data/Serializer.pm
lib/Catalyst/Action/Serialize/JSON.pm
lib/Catalyst/Action/Serialize/JSON/XS.pm
lib/Catalyst/Action/Serialize/JSONP.pm
lib/Catalyst/Action/Serialize/View.pm
lib/Catalyst/Action/Serialize/XML/Simple.pm
lib/Catalyst/Action/Serialize/YAML.pm
lib/Catalyst/Action/Serialize/YAML/HTML.pm
lib/Catalyst/Action/SerializeBase.pm
lib/Catalyst/Controller/REST.pm
lib/Catalyst/Request/REST.pm
lib/Catalyst/Request/REST/ForBrowsers.pm
lib/Catalyst/TraitFor/Request/REST.pm
lib/Catalyst/TraitFor/Request/REST/ForBrowsers.pm
t/catalyst-traitfor-request-rest-forbrowsers.t
t/catalyst-traitfor-request-rest.t

diff --git a/Changes b/Changes
index 07f9516..5754901 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,3 +1,6 @@
+Tue  21 Feb 2012 11:40:00 GMT - Release 0.98
+  More fixes as per last release.
+
 Tue  21 Feb 2012 09:58:00 GMT - Release 0.97
   Fix test with latest Catalyst version which passes _log into
   requests.
index 20f371f..fcf7c6a 100644 (file)
@@ -8,7 +8,7 @@ use Module::Pluggable::Object;
 use MRO::Compat;
 use Moose::Util::TypeConstraints;
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 has plugins => ( is => 'rw' );
index e2771f9..059c4c7 100644 (file)
@@ -6,7 +6,7 @@ use Scalar::Util qw(openhandle);
 
 extends 'Catalyst::Action';
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub execute {
index 315acb5..6904a84 100644 (file)
@@ -10,7 +10,7 @@ use Scalar::Util qw(openhandle);
 my $compartment = Safe->new;
 $compartment->permit_only( qw(padany null lineseq const pushmark list anonhash anonlist refgen leaveeval undef) );
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub execute {
index 7f80636..99d3a6e 100644 (file)
@@ -7,7 +7,7 @@ use Scalar::Util qw(openhandle);
 extends 'Catalyst::Action';
 use JSON;
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub execute {
index e47c789..618a5d5 100644 (file)
@@ -5,7 +5,7 @@ use namespace::autoclean;
 
 extends 'Catalyst::Action';
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub execute {
index 17d2313..e31f62f 100644 (file)
@@ -6,7 +6,7 @@ use Scalar::Util qw(openhandle);
 
 extends 'Catalyst::Action';
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub execute {
index 6ad7ddd..d95bc0f 100644 (file)
@@ -7,7 +7,7 @@ use Scalar::Util qw(openhandle);
 extends 'Catalyst::Action';
 use YAML::Syck;
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub execute {
index 161b1fe..9e37e57 100644 (file)
@@ -6,7 +6,7 @@ use namespace::autoclean;
 extends 'Catalyst::Action::Deserialize';
 use HTTP::Body;
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 our $NO_HTTP_BODY_TYPES_INITIALIZATION;
index 7601c0f..f848ae4 100644 (file)
@@ -10,7 +10,7 @@ use Catalyst::Controller::REST;
 
 BEGIN { require 5.008001; }
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub BUILDARGS {
index e978b74..d9482d3 100644 (file)
@@ -3,7 +3,7 @@ package Catalyst::Action::REST::ForBrowsers;
 use Moose;
 use namespace::autoclean;
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 extends 'Catalyst::Action::REST';
index 96d838c..7f78206 100644 (file)
@@ -7,7 +7,7 @@ extends 'Catalyst::Action::SerializeBase';
 use Module::Pluggable::Object;
 use MRO::Compat;
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 has _encoders => (
index 6f79fc8..bed79d8 100644 (file)
@@ -5,7 +5,7 @@ use namespace::autoclean;
 
 extends 'Catalyst::Action';
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub execute {
index d515c1d..856f7fa 100644 (file)
@@ -6,7 +6,7 @@ use namespace::autoclean;
 extends 'Catalyst::Action';
 use Data::Serializer;
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub execute {
index 74d542b..bb3b912 100644 (file)
@@ -6,7 +6,7 @@ use namespace::autoclean;
 extends 'Catalyst::Action';
 use JSON ();
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 has encoder => (
index 3b07e4c..283f777 100644 (file)
@@ -6,7 +6,7 @@ use namespace::autoclean;
 extends 'Catalyst::Action::Serialize::JSON';
 use JSON::XS ();
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub _build_encoder {
index 762bb5d..23f6c0a 100644 (file)
@@ -4,7 +4,7 @@ use namespace::autoclean;
 
 extends 'Catalyst::Action::Serialize::JSON';
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 after 'execute' => sub {
index 43c51f6..064b79e 100644 (file)
@@ -4,7 +4,7 @@ use namespace::autoclean;
 
 extends 'Catalyst::Action';
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub execute {
index d6a3d7f..2d8694d 100644 (file)
@@ -5,7 +5,7 @@ use namespace::autoclean;
 
 extends 'Catalyst::Action';
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub execute {
index 6dcc928..1b854d9 100644 (file)
@@ -6,7 +6,7 @@ use namespace::autoclean;
 extends 'Catalyst::Action';
 use YAML::Syck;
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub execute {
index a2d3dd3..7fffe2f 100644 (file)
@@ -7,7 +7,7 @@ extends 'Catalyst::Action';
 use YAML::Syck;
 use URI::Find;
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 sub execute {
index 0c342fc..a4af593 100644 (file)
@@ -8,7 +8,7 @@ use Module::Pluggable::Object;
 use Catalyst::Request::REST;
 use Catalyst::Utils ();
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 after BUILDARGS => sub {
index c86156e..937ae86 100644 (file)
@@ -2,7 +2,7 @@ package Catalyst::Controller::REST;
 use Moose;
 use namespace::autoclean;
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 =head1 NAME
index 8f334a0..f810dc2 100644 (file)
@@ -7,7 +7,7 @@ use namespace::autoclean;
 extends 'Catalyst::Request';
 with 'Catalyst::TraitFor::Request::REST';
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 # Please don't take this as a recommended way to do things.
index 3262d98..c813ba5 100644 (file)
@@ -3,7 +3,7 @@ use Moose;
 
 use namespace::autoclean;
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 extends 'Catalyst::Request::REST';
index a15cae3..bbaa651 100644 (file)
@@ -3,7 +3,7 @@ use Moose::Role;
 use HTTP::Headers::Util qw(split_header_words);
 use namespace::autoclean;
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 has [qw/ data accept_only /] => ( is => 'rw' );
index 36f5343..a538cda 100644 (file)
@@ -4,7 +4,7 @@ use namespace::autoclean;
 
 with 'Catalyst::TraitFor::Request::REST';
 
-our $VERSION = '0.97';
+our $VERSION = '0.98';
 $VERSION = eval $VERSION;
 
 has _determined_real_method => (
index a7e5507..4e36964 100644 (file)
@@ -37,7 +37,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
 
     {
         for my $method (qw( PUT DELETE )) {
-            my $req = $class->new();
+            my $req = $class->new(
+                _log => Catalyst::Log->new,
+            );
             $req->method('POST');
             $req->{_context} = 'MockContext';
             $req->parameters( { 'x-tunneled-method' => $method } );
@@ -51,7 +53,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
 
     {
         for my $method (qw( PUT DELETE )) {
-            my $req = $class->new();
+            my $req = $class->new(
+                _log => Catalyst::Log->new,
+            );
             $req->method('POST');
             $req->{_context} = 'MockContext';
             $req->header( 'x-http-method-override' => $method );
@@ -65,7 +69,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
 
     {
         for my $method (qw( PUT DELETE )) {
-            my $req = $class->new();
+            my $req = $class->new(
+                _log => Catalyst::Log->new,
+            );
             $req->method('GET');
             $req->{_context} = 'MockContext';
             $req->parameters( { 'x-tunneled-method' => $method } );
@@ -78,7 +84,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( {} );
@@ -92,7 +100,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
 
     {
         for my $with (qw( HTTP.Request XMLHttpRequest )) {
-            my $req = $class->new();
+            my $req = $class->new(
+                _log => Catalyst::Log->new,
+            );
             $req->{_context} = 'MockContext';
             $req->headers(
                 HTTP::Headers->new( 'X-Requested-With' => $with ) );
@@ -105,7 +115,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( { 'content-type' => 'text/json' } );
@@ -118,7 +130,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( { 'content-type' => 'text/html' } );
@@ -131,7 +145,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( {} );
@@ -145,7 +161,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( {} );
@@ -162,7 +180,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( {} );
@@ -179,7 +199,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( {} );
index 9b936ec..4dd98f9 100644 (file)
@@ -8,6 +8,7 @@ use Catalyst::Request::REST;
 use Catalyst::TraitFor::Request::REST;
 use Moose::Meta::Class;
 use HTTP::Headers;
+use Catalyst::Log;
 
 my $anon_class = Moose::Meta::Class->create_anon_class(
     superclasses => ['Catalyst::Request'],
@@ -17,7 +18,9 @@ my $anon_class = Moose::Meta::Class->create_anon_class(
 
 for my $class ( $anon_class, 'Catalyst::Request::REST' ) {
     {
-        my $request = Catalyst::Request::REST->new;
+        my $request = Catalyst::Request::REST->new(
+            _log => Catalyst::Log->new
+        );
         $request->{_context} = 'MockContext';
         $request->headers( HTTP::Headers->new );
         $request->parameters( {} );
@@ -34,7 +37,7 @@ for my $class ( $anon_class, 'Catalyst::Request::REST' ) {
     }
 
     {
-        my $request = Catalyst::Request::REST->new;
+        my $request = Catalyst::Request::REST->new( _log => Catalyst::Log->new );
         $request->{_context} = 'MockContext';
         $request->headers( HTTP::Headers->new );
         $request->parameters( { 'content-type' => 'text/fudge' } );
@@ -52,7 +55,7 @@ for my $class ( $anon_class, 'Catalyst::Request::REST' ) {
     }
 
     {
-        my $request = Catalyst::Request::REST->new;
+        my $request = Catalyst::Request::REST->new( _log => Catalyst::Log->new );
         $request->{_context} = 'MockContext';
         $request->headers( HTTP::Headers->new );
         $request->parameters( { 'content-type' => 'text/fudge' } );
@@ -63,7 +66,7 @@ for my $class ( $anon_class, 'Catalyst::Request::REST' ) {
     }
 
     {
-        my $request = Catalyst::Request::REST->new;
+        my $request = Catalyst::Request::REST->new( _log => Catalyst::Log->new );
         $request->{_context} = 'MockContext';
         $request->headers( HTTP::Headers->new );
         $request->parameters( {} );
@@ -91,7 +94,7 @@ for my $class ( $anon_class, 'Catalyst::Request::REST' ) {
     }
 
     {
-        my $request = Catalyst::Request::REST->new;
+        my $request = Catalyst::Request::REST->new( _log => Catalyst::Log->new );
         $request->{_context} = 'MockContext';
         $request->headers( HTTP::Headers->new );
         $request->parameters( {} );
@@ -116,7 +119,7 @@ for my $class ( $anon_class, 'Catalyst::Request::REST' ) {
     }
 
     {
-        my $request = Catalyst::Request::REST->new;
+        my $request = Catalyst::Request::REST->new( _log => Catalyst::Log->new );
         $request->{_context} = 'MockContext';
         $request->headers( HTTP::Headers->new );
         $request->parameters( {} );
@@ -141,7 +144,7 @@ for my $class ( $anon_class, 'Catalyst::Request::REST' ) {
     }
 
     {
-        my $request = Catalyst::Request::REST->new;
+        my $request = Catalyst::Request::REST->new( _log => Catalyst::Log->new );
         $request->{_context} = 'MockContext';
         $request->headers( HTTP::Headers->new );
         $request->parameters( {} );
@@ -159,7 +162,7 @@ for my $class ( $anon_class, 'Catalyst::Request::REST' ) {
     }
 
     {
-        my $request = Catalyst::Request::REST->new;
+        my $request = Catalyst::Request::REST->new( _log => Catalyst::Log->new );
         $request->{_context} = 'MockContext';
         $request->headers( HTTP::Headers->new );
         $request->parameters( {} );