X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FOracle.pm;h=1bb9f798bea17fadf03c99ec5f901e359b5f29ae;hb=28cea3aa579791963ea117bdbfdbd4ee3e948555;hp=29bfce17a3aab220fa96772e79e00c69e1b2334a;hpb=281719d262c5f565901fd017b6f3c12030de81e4;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 29bfce1..1bb9f79 100644 --- a/lib/DBIx/Class/Storage/DBI/Oracle.pm +++ b/lib/DBIx/Class/Storage/DBI/Oracle.pm @@ -4,11 +4,12 @@ use strict; use warnings; use base qw/DBIx::Class::Storage::DBI/; +use mro 'c3'; sub _rebless { my ($self) = @_; - my $version = eval { $self->_dbh->get_info(18); }; + my $version = eval { $self->dbh->get_info(18); }; if ( !$@ ) { my ($major, $minor, $patchlevel) = split(/\./, $version);