[Bast-commits] r6508 - DBIx-Class/0.08/trunk/lib/DBIx/Class

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2009-06-04 20:54:28 +0000 (Thu, 04 Jun 2009)
New Revision: 6508

Modified:
   DBIx-Class/0.08/trunk/lib/DBIx/Class/ResultSet.pm
Log:
having without group_by is useless - thus do not supply a group_by on count, let things die

Modified: DBIx-Class/0.08/trunk/lib/DBIx/Class/ResultSet.pm
===================================================================
--- DBIx-Class/0.08/trunk/lib/DBIx/Class/ResultSet.pm	2009-06-04 20:39:45 UTC (rev 6507)
+++ DBIx-Class/0.08/trunk/lib/DBIx/Class/ResultSet.pm	2009-06-04 20:54:28 UTC (rev 6508)
@@ -1155,7 +1155,7 @@
   return $self->search(@_)->count if @_ and defined $_[0];
   return scalar @{ $self->get_cache } if $self->get_cache;
 
-  my $meth = $self->_has_attr (qw/prefetch collapse distinct group_by having/) 
+  my $meth = $self->_has_attr (qw/prefetch collapse distinct group_by/)
     ? 'count_grouped'
     : 'count'
   ;