X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FSchema%2FResultSetAccessors.pm;fp=lib%2FDBIx%2FClass%2FSchema%2FResultSetAccessors.pm;h=473d3e3143711c4124c62f06971280473c97bbc8;hb=867277b344da8b93c7c539ec7d156ea7faae96af;hp=63b741d401c0b3c3a1bf5b46789077728d20e708;hpb=6e3c6029ca80748d228be8f2a0bd1e56c37932b0;p=dbsrgits%2FDBIx-Class-Schema-ResultSetAccessors.git

diff --git a/lib/DBIx/Class/Schema/ResultSetAccessors.pm b/lib/DBIx/Class/Schema/ResultSetAccessors.pm
index 63b741d..473d3e3 100644
--- a/lib/DBIx/Class/Schema/ResultSetAccessors.pm
+++ b/lib/DBIx/Class/Schema/ResultSetAccessors.pm
@@ -53,7 +53,7 @@ sub resultset_accessor_name {
 sub pluralize_resultset_accessor_name {
     my ($self, $original) = @_;
 
-    return join ' ', split /\s+/,
+    return join '_', split /\s+/,
         Lingua::EN::Inflect::Phrase::to_PL(join ' ', split /_/, $original);
 }