X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FOracle.pm;h=64bf9f182b67735b1bb62f07d6ac0bd0856c455c;hb=eeb8cfeb91eebb5bd979202c234c9facf71f0b25;hp=778d12f9ab2414590253ec1d6306ea579bc33dcd;hpb=adb3554a3f72bf9c9b267c5eb84a8401da64bf37;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/lib/DBIx/Class/Storage/DBI/Oracle.pm b/lib/DBIx/Class/Storage/DBI/Oracle.pm index 778d12f..64bf9f1 100644 --- a/lib/DBIx/Class/Storage/DBI/Oracle.pm +++ b/lib/DBIx/Class/Storage/DBI/Oracle.pm @@ -26,17 +26,17 @@ sub _rebless { } sub _svp_begin { - my ($self, $dbh, $name) = @_; + my ($self, $name) = @_; - $dbh->do("SAVEPOINT $name"); + $self->dbh->do("SAVEPOINT $name"); } # Would've implemented _svp_release here, but Oracle doesn't support it. sub _svp_rollback { - my ($self, $dbh, $name) = @_; + my ($self, $name) = @_; - $dbh->do("ROLLBACK TO SAVEPOINT $name") + $self->dbh->do("ROLLBACK TO SAVEPOINT $name") } 1;