my ($sql, @bind) = $self->render_aqt(
$self->_expand_maybe_list_expr($f, -ident)
);
- return wantarray
- ? $self->_sqlcase(' returning ') . $sql
- : ($self->_sqlcase(' returning ').$sql, @bind);
+ return ($self->_sqlcase(' returning ').$sql, @bind);
}
sub _expand_insert_value {
my ($sql, @bind) = $self->render_aqt(
$self->expand_expr($expr, $default_scalar_to)
);
- return (wantarray ? ($sql, @bind) : $sql);
+ return ($sql, @bind);
}
sub _normalize_op {
@parts;
return (
join($join, map $_->[0], @final),
- (wantarray ? (map @{$_}[1..$#$_], @final) : ()),
+ (map @{$_}[1..$#$_], @final),
);
}
my $final_sql = $self->_sqlcase(' order by ').$sql;
- return wantarray ? ($final_sql, @bind) : $final_sql;
+ return ($final_sql, @bind);
}
# _order_by no longer needs to call this so doesn't but DBIC uses it.