r52380 - in /branches/upstream/libcatalyst-action-rest-perl/current: ./ lib/Catalyst/Action/ lib/Catalyst/Action/Deserialize/ lib/Catalyst/Action/Deserialize/Data/ lib/Catalyst/Action/Deserialize/XML/ lib/Catalyst/Action/Serialize/ lib/Catalyst/Action/Serialize/Data/ lib/Catalyst/Action/Serialize/JSON/ lib/Catalyst/Action/Serialize/XML/ lib/Catalyst/Action/Serialize/YAML/ lib/Catalyst/Controller/ lib/Catalyst/Request/ lib/Catalyst/Request/REST/ lib/Catalyst/TraitFor/Request/ lib/Catalyst/TraitFor/Request/REST/ t/ t/lib/Test/Catalyst/Action/REST/Controller/ t/lib/Test/Serialize/Controller/

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Tue Feb 9 15:45:18 UTC 2010


Author: jawnsy-guest
Date: Tue Feb  9 15:45:10 2010
New Revision: 52380

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=52380
Log:
[svn-upgrade] Integrating new upstream version, libcatalyst-action-rest-perl (0.83)

Added:
    branches/upstream/libcatalyst-action-rest-perl/current/t/lib/Test/Catalyst/Action/REST/Controller/Override.pm
Modified:
    branches/upstream/libcatalyst-action-rest-perl/current/Changes
    branches/upstream/libcatalyst-action-rest-perl/current/MANIFEST
    branches/upstream/libcatalyst-action-rest-perl/current/META.yml
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/Data/Serializer.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/JSON.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/View.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/XML/Simple.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/YAML.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/REST.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/Data/Serializer.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSON.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSON/XS.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSONP.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/View.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/XML/Simple.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/YAML.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/YAML/HTML.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/SerializeBase.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Controller/REST.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Request/REST.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Request/REST/ForBrowsers.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/TraitFor/Request/REST.pm
    branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/TraitFor/Request/REST/ForBrowsers.pm
    branches/upstream/libcatalyst-action-rest-perl/current/t/catalyst-action-serialize-accept.t
    branches/upstream/libcatalyst-action-rest-perl/current/t/lib/Test/Serialize/Controller/REST.pm

Modified: branches/upstream/libcatalyst-action-rest-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/Changes?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/Changes (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/Changes Tue Feb  9 15:45:10 2010
@@ -1,3 +1,12 @@
+Mon  8 Feb 2010 22:17:12 GMT - Release 0.83
+  Make it possible to deserialize a request with a DELETE method. This probably
+  breaks 'strict' REST guidelines, but is useful for being able to delete multiple
+  resources from a single call by providing a batch delete method.
+
+  Remove JSONP from the list of default serializers (RT#54336)
+
+  Fix MANIFEST (RT#54408)
+
 Thu  4 Feb 2010 22:31:57 GMT - Release 0.82
 
   Integrated Catalyst::Request::REST::ForBrowsers as

Modified: branches/upstream/libcatalyst-action-rest-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/MANIFEST?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/MANIFEST (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/MANIFEST Tue Feb  9 15:45:10 2010
@@ -48,7 +48,6 @@
 t/catalyst-action-serialize-query.t
 t/catalyst-action-serialize.t
 t/catalyst-controller-rest.t
-t/catalyst-request-rest.t
 t/catalyst-traitfor-request-rest-forbrowsers.t
 t/catalyst-traitfor-request-rest.t
 t/data-serializer.t
@@ -59,6 +58,7 @@
 t/lib/Test/Catalyst/Action/REST.pm
 t/lib/Test/Catalyst/Action/REST/Controller/Actions.pm
 t/lib/Test/Catalyst/Action/REST/Controller/Deserialize.pm
+t/lib/Test/Catalyst/Action/REST/Controller/Override.pm
 t/lib/Test/Catalyst/Action/REST/Controller/REST.pm
 t/lib/Test/Catalyst/Action/REST/Controller/Root.pm
 t/lib/Test/Catalyst/Action/REST/Controller/Serialize.pm
@@ -68,7 +68,6 @@
 t/lib/Test/Serialize/Controller/REST.pm
 t/lib/Test/Serialize/View/Awful.pm
 t/lib/Test/Serialize/View/Simple.pm
-t/pod.t
 t/view.t
 t/xml-simple.t
 t/yaml-html.t

Modified: branches/upstream/libcatalyst-action-rest-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/META.yml?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/META.yml (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/META.yml Tue Feb  9 15:45:10 2010
@@ -35,4 +35,4 @@
 resources:
   license: http://dev.perl.org/licenses/
   repository: git://git.shadowcat.co.uk/catagits/Catalyst-Action-REST.git
-version: 0.82
+version: 0.83

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize.pm Tue Feb  9 15:45:10 2010
@@ -7,7 +7,7 @@
 use Module::Pluggable::Object;
 use MRO::Compat;
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 has plugins => ( is => 'rw' );
@@ -16,7 +16,7 @@
     my $self = shift;
     my ( $controller, $c ) = @_;
 
-    my @demethods = qw(POST PUT OPTIONS);
+    my @demethods = qw(POST PUT OPTIONS DELETE);
     my $method    = $c->request->method;
     if ( grep /^$method$/, @demethods ) {
         my ( $sclass, $sarg, $content_type ) =

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/Data/Serializer.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/Data/Serializer.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/Data/Serializer.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/Data/Serializer.pm Tue Feb  9 15:45:10 2010
@@ -6,7 +6,7 @@
 extends 'Catalyst::Action';
 use Data::Serializer;
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 sub execute {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/JSON.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/JSON.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/JSON.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/JSON.pm Tue Feb  9 15:45:10 2010
@@ -6,7 +6,7 @@
 extends 'Catalyst::Action';
 use JSON qw( decode_json );
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 sub execute {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/View.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/View.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/View.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/View.pm Tue Feb  9 15:45:10 2010
@@ -5,7 +5,7 @@
 
 extends 'Catalyst::Action';
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 sub execute {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/XML/Simple.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/XML/Simple.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/XML/Simple.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/XML/Simple.pm Tue Feb  9 15:45:10 2010
@@ -5,7 +5,7 @@
 
 extends 'Catalyst::Action';
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 sub execute {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/YAML.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/YAML.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/YAML.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Deserialize/YAML.pm Tue Feb  9 15:45:10 2010
@@ -6,7 +6,7 @@
 extends 'Catalyst::Action';
 use YAML::Syck;
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 sub execute {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/REST.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/REST.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/REST.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/REST.pm Tue Feb  9 15:45:10 2010
@@ -10,7 +10,7 @@
 
 BEGIN { require 5.008001; }
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 sub new {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize.pm Tue Feb  9 15:45:10 2010
@@ -7,7 +7,7 @@
 use Module::Pluggable::Object;
 use MRO::Compat;
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 has _encoders => (

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/Data/Serializer.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/Data/Serializer.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/Data/Serializer.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/Data/Serializer.pm Tue Feb  9 15:45:10 2010
@@ -6,7 +6,7 @@
 extends 'Catalyst::Action';
 use Data::Serializer;
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 sub execute {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSON.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSON.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSON.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSON.pm Tue Feb  9 15:45:10 2010
@@ -6,7 +6,7 @@
 extends 'Catalyst::Action';
 use JSON ();
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 has encoder => (

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSON/XS.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSON/XS.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSON/XS.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSON/XS.pm Tue Feb  9 15:45:10 2010
@@ -6,7 +6,7 @@
 extends 'Catalyst::Action::Serialize::JSON';
 use JSON::XS ();
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 sub _build_encoder {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSONP.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSONP.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSONP.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/JSONP.pm Tue Feb  9 15:45:10 2010
@@ -4,7 +4,7 @@
 
 extends 'Catalyst::Action::Serialize::JSON';
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 after 'execute' => sub {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/View.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/View.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/View.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/View.pm Tue Feb  9 15:45:10 2010
@@ -4,7 +4,7 @@
 
 extends 'Catalyst::Action';
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 sub execute {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/XML/Simple.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/XML/Simple.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/XML/Simple.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/XML/Simple.pm Tue Feb  9 15:45:10 2010
@@ -5,7 +5,7 @@
 
 extends 'Catalyst::Action';
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 sub execute {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/YAML.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/YAML.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/YAML.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/YAML.pm Tue Feb  9 15:45:10 2010
@@ -6,7 +6,7 @@
 extends 'Catalyst::Action';
 use YAML::Syck;
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 sub execute {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/YAML/HTML.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/YAML/HTML.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/YAML/HTML.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/Serialize/YAML/HTML.pm Tue Feb  9 15:45:10 2010
@@ -7,7 +7,7 @@
 use YAML::Syck;
 use URI::Find;
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 sub execute {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/SerializeBase.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/SerializeBase.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/SerializeBase.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Action/SerializeBase.pm Tue Feb  9 15:45:10 2010
@@ -8,7 +8,7 @@
 use Catalyst::Request::REST;
 use Catalyst::Utils ();
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 after BUILDARGS => sub {

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Controller/REST.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Controller/REST.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Controller/REST.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Controller/REST.pm Tue Feb  9 15:45:10 2010
@@ -2,7 +2,7 @@
 use Moose;
 use namespace::autoclean;
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 =head1 NAME
@@ -150,6 +150,11 @@
 
 If a callback=? parameter is passed, this returns javascript in the form of: $callback($serializedJSON);
 
+Note - this is disabled by default as it can be a security risk if you are unaware.
+
+The usual MIME types for this serialization format are: 'text/javascript', 'application/x-javascript',
+'application/javascript'.
+
 =item * C<text/x-data-dumper> => C<Data::Serializer>
 
 Uses the L<Data::Serializer> module to generate L<Data::Dumper> output.
@@ -272,9 +277,6 @@
         'text/x-yaml'        => 'YAML',
         'application/json'   => 'JSON',
         'text/x-json'        => 'JSON',
-        'application/x-javascript'  => 'JSONP',
-        'application/javascript'    => 'JSONP',
-        'text/javascript'    => 'JSONP',
         'text/x-data-dumper' => [ 'Data::Serializer', 'Data::Dumper' ],
         'text/x-data-denter' => [ 'Data::Serializer', 'Data::Denter' ],
         'text/x-data-taxi'   => [ 'Data::Serializer', 'Data::Taxi'   ],
@@ -509,9 +511,6 @@
          'text/x-yaml'        => 'YAML',
          'application/json'   => 'JSON',
          'text/x-json'        => 'JSON',
-         'application/x-javascript' => 'JSONP',
-         'application/javascript'   => 'JSONP',
-         'text/javascript'    => 'JSONP',
          'text/x-data-dumper' => [ 'Data::Serializer', 'Data::Dumper' ],
          'text/x-data-denter' => [ 'Data::Serializer', 'Data::Denter' ],
          'text/x-data-taxi'   => [ 'Data::Serializer', 'Data::Taxi'   ],

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Request/REST.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Request/REST.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Request/REST.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Request/REST.pm Tue Feb  9 15:45:10 2010
@@ -7,7 +7,7 @@
 extends 'Catalyst::Request';
 with 'Catalyst::TraitFor::Request::REST';
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 # Please don't take this as a recommended way to do things.

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Request/REST/ForBrowsers.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Request/REST/ForBrowsers.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Request/REST/ForBrowsers.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/Request/REST/ForBrowsers.pm Tue Feb  9 15:45:10 2010
@@ -3,7 +3,7 @@
 
 use namespace::autoclean;
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 extends 'Catalyst::Request::REST';

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/TraitFor/Request/REST.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/TraitFor/Request/REST.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/TraitFor/Request/REST.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/TraitFor/Request/REST.pm Tue Feb  9 15:45:10 2010
@@ -3,7 +3,7 @@
 use HTTP::Headers::Util qw(split_header_words);
 use namespace::autoclean;
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 has [qw/ data accept_only /] => ( is => 'rw' );

Modified: branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/TraitFor/Request/REST/ForBrowsers.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/TraitFor/Request/REST/ForBrowsers.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/TraitFor/Request/REST/ForBrowsers.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/lib/Catalyst/TraitFor/Request/REST/ForBrowsers.pm Tue Feb  9 15:45:10 2010
@@ -4,7 +4,7 @@
 
 with 'Catalyst::TraitFor::Request::REST';
 
-our $VERSION = '0.82';
+our $VERSION = '0.83';
 $VERSION = eval $VERSION;
 
 has _determined_real_method => (

Modified: branches/upstream/libcatalyst-action-rest-perl/current/t/catalyst-action-serialize-accept.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/t/catalyst-action-serialize-accept.t?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/t/catalyst-action-serialize-accept.t (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/t/catalyst-action-serialize-accept.t Tue Feb  9 15:45:10 2010
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-use Test::More tests => 16;
+use Test::More;
 use Data::Serializer;
 use FindBin;
 
@@ -88,4 +88,14 @@
     is( $res->header('Content-type'), 'text/x-data-dumper', '... with expected content-type')
 }
 
-1;
+# Make sure that the default content type you specify really gets used.
+{
+    my $req = $t->get(url => '/override/test');
+    $req->remove_header('Content-Type');
+    my $res = request($req);
+    ok( $res->is_success, 'GET the serialized request succeeded' );
+    is( $res->content, "--- \nlou: is my cat\n", "Request returned proper data");
+}
+
+done_testing;
+

Added: branches/upstream/libcatalyst-action-rest-perl/current/t/lib/Test/Catalyst/Action/REST/Controller/Override.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/t/lib/Test/Catalyst/Action/REST/Controller/Override.pm?rev=52380&op=file
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/t/lib/Test/Catalyst/Action/REST/Controller/Override.pm (added)
+++ branches/upstream/libcatalyst-action-rest-perl/current/t/lib/Test/Catalyst/Action/REST/Controller/Override.pm Tue Feb  9 15:45:10 2010
@@ -1,0 +1,22 @@
+package Test::Catalyst::Action::REST::Controller::Override;
+
+use Moose;
+use namespace::autoclean;
+
+BEGIN { extends 'Catalyst::Controller' }
+
+__PACKAGE__->config(
+    'default'   => 'application/json',
+    'map'       => {
+        'application/json'   => 'YAML', # Yes, this is deliberate!
+    },
+);
+
+sub test :Local :ActionClass('Serialize') {
+    my ( $self, $c ) = @_;
+    $c->stash->{'rest'} = {
+        lou => 'is my cat',
+    };
+}
+
+1;

Modified: branches/upstream/libcatalyst-action-rest-perl/current/t/lib/Test/Serialize/Controller/REST.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcatalyst-action-rest-perl/current/t/lib/Test/Serialize/Controller/REST.pm?rev=52380&op=diff
==============================================================================
--- branches/upstream/libcatalyst-action-rest-perl/current/t/lib/Test/Serialize/Controller/REST.pm (original)
+++ branches/upstream/libcatalyst-action-rest-perl/current/t/lib/Test/Serialize/Controller/REST.pm Tue Feb  9 15:45:10 2010
@@ -27,6 +27,9 @@
         'text/view'   => [ 'View', 'Simple' ],
         'text/explodingview' => [ 'View', 'Awful' ],
         'text/broken' => 'Broken',
+        'text/javascript', => 'JSONP',
+        'application/x-javascript' => 'JSONP',
+        'application/javascript' => 'JSONP',
     },
 );
 




More information about the Pkg-perl-cvs-commits mailing list