X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FSybase%2FASE.pm;h=9c4f2f25be33b7e2db6380d892d957e0b7fadb02;hb=52cef7e30a43620553dc38ce52a10946b76a814c;hp=55fb580db42a41a8a730697998a35e99c9f2ae91;hpb=6d5679b24ddc274203df7399901f33c8eb9355f1;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/Storage/DBI/Sybase/ASE.pm b/lib/DBIx/Class/Storage/DBI/Sybase/ASE.pm index 55fb580..9c4f2f2 100644 --- a/lib/DBIx/Class/Storage/DBI/Sybase/ASE.pm +++ b/lib/DBIx/Class/Storage/DBI/Sybase/ASE.pm @@ -523,7 +523,7 @@ sub insert_bulk { if (not $use_bulk_api) { my $blob_cols = $self->_remove_blob_cols_array($source, $cols, $data); -# _execute_array uses a txn anyway, but it ends too early in case we need to +# next::method uses a txn anyway, but it ends too early in case we need to # select max(col) to get the identity for inserting blobs. ($self, my $guard) = $self->{transaction_depth} == 0 ? ($self->_writer_storage, $self->_writer_storage->txn_scope_guard) @@ -654,7 +654,7 @@ sub insert_bulk { no strict 'refs'; local *{ref($sth).'::finish'} = sub {}; - $self->_execute_array( + $self->_dbh_execute_for_fetch( $source, $sth, $proto_bind, \@source_columns, \@new_data ); }