| Subject: | Double quoting when calling select() with a limit, when quote_char is set |
Example code:
my $sa = SQL::Abstract::Limit->new(
quote_char => q{`},
name_sep => q{.},
limit_dialect => q{LimitXY}
);
my ($stmt, @bind) = $sa->select(q{table}, undef, {field=>1}, q{id}, 1);
print $stmt;
Output:
SELECT * FROM ``table`` WHERE ( `field` = ? ) ORDER BY `id` LIMIT 1
Expected:
SELECT * FROM `table` WHERE ( `field` = ? ) ORDER BY `id` LIMIT 1
Also note that the same code without the limit specified outputs:
SELECT * FROM `table` WHERE ( field = ? ) ORDER BY id
While SQL::Abstract for the same case returns:
SELECT * FROM `table` WHERE ( `field` = ? ) ORDER BY `id`