Added namespace::clean and set the latest DBIx::Class version as required to take...

[dbsrgits/DBIx-Class-Schema-ResultSetAccessors.git] / lib / DBIx / Class / Schema / ResultSetAccessors.pm

diff --git a/lib/DBIx/Class/Schema/ResultSetAccessors.pm b/lib/DBIx/Class/Schema/ResultSetAccessors.pm
index cb858ba..febc13e 100644 (file)
--- a/lib/DBIx/Class/Schema/ResultSetAccessors.pm
+++ b/lib/DBIx/Class/Schema/ResultSetAccessors.pm
@@ -3,11 +3,13 @@ package DBIx::Class::Schema::ResultSetAccessors;
 use strict;
 use warnings;
 
+use DBIx::Class::Carp qw(carp);
 use String::CamelCase;
 use Lingua::EN::Inflect::Phrase;
 use Sub::Name 'subname';
+use namespace::clean;
 
-our $VERSION = 0.001001;
+our $VERSION = 0.001004;
 
 sub register_source {
     my $self    = shift;
@@ -21,7 +23,7 @@ sub register_source {
              : $self->resultset_accessor_name($moniker);
 
     if ($schema->can($accessor_name)) {
-        $self->throw_exception(
+        carp(
             "Can't create ResultSet accessor '$accessor_name'. " .
             "Schema method with the same name already exists. " .
             "Try overloading the name via resultset_accessor_map."
@@ -97,7 +99,7 @@ in your schema class and return a hashref map of Source => accessor names. E.g.:
  # in your MyApp::Schema class
  sub resultset_accessor_map {
     {
-        Source => 'my_source',
+        Source => 'my_sources',
         Artist => 'my_artists',
     }
  }