use Carp;
use Data::Dumper;
use List::Util qw(first);
+use List::UtilsBy qw(sort_by);
use constant META_CVARS => 'cvars_config';
@$configs
);
+ @return = sort_by { $_->config->sortkey } @return;
+
return \@return;
}
}
# remove rose aliases. query builder sadly is not reentrant, and will reuse the same aliases. :(
$query{$key} =~ s{\bt\d+(?:\.)?\b}{}g;
- # manually inline the values. again, rose doen't know how to handle bind params in subqueries :(
+ # manually inline the values. again, rose doesn't know how to handle bind params in subqueries :(
$query{$key} =~ s{\?}{ $config->dbh->quote(shift @{ $bind_vals{$key} }) }xeg;
$query{$key} =~ s{\n}{ }g;