Normalize group_by
Peter Rabbitson [Sun, 28 Jun 2009 12:38:36 +0000 (12:38 +0000)]
lib/DBIx/Class/ResultSet.pm

index b012e03..90a3f0d 100644 (file)
@@ -2703,6 +2703,10 @@ sub _resolved_attrs {
     $attrs->{order_by} = [];
   }
 
+  if ($attrs->{group_by} and ! ref $attrs->{group_by}) {
+    $attrs->{group_by} = [ $attrs->{group_by} ];
+  }
+
   # If the order_by is otherwise empty - we will use this for TOP limit
   # emulation and the like.
   # Although this is needed only if the order_by is not defined, it is