From: Dan Dascalescu <ddascalescu+github@gmail.com>
Date: Thu, 10 Dec 2009 03:43:24 +0000 (-0800)
Subject: More precise error messages that 'serialize' is a deprecated configuration key. POD... 
X-Git-Tag: 1.08~190
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9cd203c9c0d7099ff38fb9e1132459d76d19a360;p=catagits%2FCatalyst-Action-Serialize-Data-Serializer.git

More precise error messages that 'serialize' is a deprecated configuration key. POD for that too.
---

diff --git a/lib/Catalyst/Action/Serialize.pm b/lib/Catalyst/Action/Serialize.pm
index 1f6db7d..38dbc43 100644
--- a/lib/Catalyst/Action/Serialize.pm
+++ b/lib/Catalyst/Action/Serialize.pm
@@ -32,7 +32,7 @@ sub execute {
             $c->log->info("Could not find a serializer for $content_type");
         } else {
             $c->log->info(
-                "Could not find a serializer for an empty content type");
+                "Could not find a serializer for an empty content-type");
         }
         return 1;
     }
@@ -148,4 +148,3 @@ Marchex, Inc. paid me while I developed this module.  (http://www.marchex.com)
 You may distribute this code under the same terms as Perl itself.
 
 =cut
-
diff --git a/lib/Catalyst/Action/SerializeBase.pm b/lib/Catalyst/Action/SerializeBase.pm
index 93108bb..e616f8a 100644
--- a/lib/Catalyst/Action/SerializeBase.pm
+++ b/lib/Catalyst/Action/SerializeBase.pm
@@ -50,8 +50,8 @@ sub _load_content_plugins {
     my $config;
     
     if ( exists $controller->{'serialize'} ) {
-        $c->log->info("Using deprecated configuration for Catalyst::Action::REST!");
-        $c->log->info("Please see perldoc Catalyst::Action::REST for the update guide");
+        $c->log->info("Catalyst::Action::REST - deprecated use of 'serialize' for configuration.");
+        $c->log->info("Please see 'CONFIGURATION' in Catalyst::Controller::REST.");
         $config = $controller->{'serialize'};
         # if they're using the deprecated config, they may be expecting a
         # default mapping too.
@@ -188,4 +188,3 @@ Marchex, Inc. paid me while I developed this module.  (http://www.marchex.com)
 You may distribute this code under the same terms as Perl itself.
 
 =cut
-
diff --git a/lib/Catalyst/Controller/REST.pm b/lib/Catalyst/Controller/REST.pm
index 22a5fe9..33eb25b 100644
--- a/lib/Catalyst/Controller/REST.pm
+++ b/lib/Catalyst/Controller/REST.pm
@@ -83,6 +83,12 @@ Or if you use pre-Moose Catalyst versions,
   use parent 'Catalyst::Controller::REST';
 
 
+=head1 CONFIGURATION
+
+See L<Catalyst::Action::Serialize/CONFIGURATION>. Note that the C<serialize>
+key has been deprecated.
+
+
 =head1 SERIALIZATION
 
 Catalyst::Controller::REST will automatically serialize your