X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FPK%2FAuto%2FDB2.pm;fp=lib%2FDBIx%2FClass%2FPK%2FAuto%2FDB2.pm;h=f05f78188fab276c8b14ca1ead5bf1d68c90da7e;hb=247f473ac4d1aa19d03e172cfcc85f910d7d1165;hp=0cfbcc1398567e4f9fe2c543b22da4d6656fe112;hpb=19feb86bd0beb518ffb5bcbfe3cf37d2cc9c1c21;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/PK/Auto/DB2.pm b/lib/DBIx/Class/PK/Auto/DB2.pm index 0cfbcc1..f05f781 100644 --- a/lib/DBIx/Class/PK/Auto/DB2.pm +++ b/lib/DBIx/Class/PK/Auto/DB2.pm @@ -12,7 +12,7 @@ sub last_insert_id my ($self) = @_; my $dbh = $self->result_source->storage->dbh; - my $sth = $dbh->prepare_cached("VALUES(IDENTITY_VAL_LOCAL())"); + my $sth = $dbh->prepare_cached("VALUES(IDENTITY_VAL_LOCAL())", {}, 3); $sth->execute(); my @res = $sth->fetchrow_array();