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=8c4b6c50e873a2b5993d1bfe0f40763d994b7da4;hp=d52adbbba09bc55e19c3fdbfe55c5372da9c710d;hpb=08fabf592cfb90f174428eb8ac258caed293e6f7;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 d52adbb..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); @@ -25,7 +26,6 @@ sub _rebless { } } - 1; =head1 NAME