1 package DBIx::Class::SQLMaker::Role::SQLA2Passthrough;
6 my ($orig, $self, $table, $fields, $where, $rs_attrs, $limit, $offset) = @_;
8 $fields = \[ $self->render_expr({ -list => [
10 map +(ref($_) eq 'HASH'
13 my $as = delete $f{-as};
15 my $func = +{ "-${f}" => $rhs };
17 ? +{ -op => [ 'as', $func, { -ident => [ $as ] } ] }
20 : $_), ref($fields) eq 'ARRAY' ? @$fields : $fields
23 if (my $gb = $rs_attrs->{group_by}) {
26 group_by => \[ $self->render_expr({ -list => $gb }, -ident) ]
29 $self->$orig($table, $fields, $where, $rs_attrs, $limit, $offset);