Merge
t0m [Mon, 29 Jun 2009 20:53:15 +0000 (21:53 +0100)]
1  2 
Changes
README
lib/Catalyst/Action/REST.pm
lib/Catalyst/Controller/REST.pm

diff --combined Changes
+++ b/Changes
@@@ -1,6 -1,9 +1,11 @@@
- Wed May 27 16:34:00 2009 (agladdish) - Release 0.72
-   Switch from NEXT to MRO::Compat.
-   
++  Switch from NEXT to MRO::Compat (agladdish).
++
+ Sat Jun 27 20:20:09 EDT 2009 (hdp) - Release 0.73
+   Packaging fixes
+ Thu Jun 25 14:52:29 EDT 2009 (hdp) - Release 0.72
+   Refresh Module::Install
  Sat Mar 28 09:16:09 PDT 2009 (hdp) - Release 0.71
    Fix RT#44641, missing documented 'end' action
  
diff --combined README
--- 1/README
--- 2/README
+++ b/README
@@@ -2,7 -2,7 +2,7 @@@ NAM
      Catalyst::Controller::REST - A RESTful controller
  
  VERSION
-     0.71
+     0.73
  
  SYNOPSIS
          package Foo::Controller::Bar;
@@@ -284,22 -284,22 +284,22 @@@ IMPLEMENTATION DETAIL
          The "begin" method uses Catalyst::Action::Deserialize. The "end"
          method uses Catalyst::Action::Serialize. If you want to override
          either behavior, simply implement your own "begin" and "end" actions
 -        and use NEXT:
 +        and use MRO::Compat:
  
            my Foo::Controller::Monkey;
            use base qw(Catalyst::Controller::REST);
  
            sub begin :Private {
              my ($self, $c) = @_;
 -            ... do things before Deserializing ...
 -            $self->NEXT::begin($c); 
 +            ... do things before Deserializing ...            
 +            $self->maybe::next::method($c);
              ... do things after Deserializing ...
            } 
  
            sub end :Private {
              my ($self, $c) = @_;
 -            ... do things before Serializing ...
 -            $self->NEXT::end($c); 
 +            ... do things before Serializing ...            
 +            $self->maybe::next::method($c);
              ... do things after Serializing ...
            }
  
@@@ -18,7 -18,7 +18,7 @@@ use Catalyst::Controller::REST
  
  BEGIN { require 5.008001; }
  
- our $VERSION = '0.72';
 -our $VERSION = '0.73';
++our $VERSION = '0.71';
  
  sub new {
    my $class  = shift;
@@@ -1,6 -1,6 +1,6 @@@
  package Catalyst::Controller::REST;
  
- our $VERSION = '0.71';
+ our $VERSION = '0.73';
  
  =head1 NAME
  
@@@ -442,22 -442,22 +442,22 @@@ L<Catalyst::Action::Serialize>
  The C<begin> method uses L<Catalyst::Action::Deserialize>.  The C<end>
  method uses L<Catalyst::Action::Serialize>.  If you want to override
  either behavior, simply implement your own C<begin> and C<end> actions
 -and use NEXT:
 +and use MRO::Compat:
  
    my Foo::Controller::Monkey;
    use base qw(Catalyst::Controller::REST);
  
    sub begin :Private {
      my ($self, $c) = @_;
 -    ... do things before Deserializing ...
 -    $self->NEXT::begin($c); 
 +    ... do things before Deserializing ...    
 +    $self->maybe::next::method($c);    
      ... do things after Deserializing ...
    } 
  
    sub end :Private {
      my ($self, $c) = @_;
 -    ... do things before Serializing ...
 -    $self->NEXT::end($c); 
 +    ... do things before Serializing ...    
 +    $self->maybe::next::method($c);
      ... do things after Serializing ...
    }