X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FNoBindVars.pm;h=7027ad6350df540c538fb2c39da45eb018623d1e;hb=5fd73721c5877a68d3ca0746e27f52701b57790d;hp=9f81caffce384be029e926eeb5b76da6837a1831;hpb=00c937a24ecd01b75997dd3e0211f2377fcd84ff;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/lib/DBIx/Class/Storage/DBI/NoBindVars.pm b/lib/DBIx/Class/Storage/DBI/NoBindVars.pm index 9f81caf..7027ad6 100644 --- a/lib/DBIx/Class/Storage/DBI/NoBindVars.pm +++ b/lib/DBIx/Class/Storage/DBI/NoBindVars.pm @@ -50,35 +50,20 @@ sub _prep_for_execute { foreach my $bound (@$bind) { my $col = shift @$bound; - my $do_quote = $self->should_quote_data_type($col); + my $datatype = 'FIXME!!!'; foreach my $data (@$bound) { if(ref $data) { $data = ''.$data; } - $data = $self->_dbh->quote($data) if $do_quote; + $data = $self->_dbh->quote($data); $new_sql .= shift(@sql_part) . $data; } } $new_sql .= join '', @sql_part; - return ($new_sql); + return ($new_sql, []); } -=head2 should_quote_data_type - -This method is called by L for every column in -order to determine if its value should be quoted or not. The sole -argument is the current column data type, and the return value is -interpreted as: true - do quote, false - do not quote. You should -override this in you Storage::DBI:: subclass, if your -RDBMS does not like quotes around certain datatypes (e.g. Sybase -and integer columns). The default method always returns true (do -quote). - -=cut - -sub should_quote_data_type { 1 } - =head1 AUTHORS Brandon Black