X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI.pm;h=d6ef837aa78fea876f8a7406d4fe2dd8759e7ac5;hb=584ea6e45cc0c7608789d3b6ea2d16151f15ed14;hp=dfa2e1e78ba299a531be0148c6359f0e8d5c17dd;hpb=e989099be9257b775a97dd09b4e9b8dbfec2dfcc;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/lib/DBIx/Class/Storage/DBI.pm b/lib/DBIx/Class/Storage/DBI.pm index dfa2e1e..d6ef837 100644 --- a/lib/DBIx/Class/Storage/DBI.pm +++ b/lib/DBIx/Class/Storage/DBI.pm @@ -1161,7 +1161,13 @@ sub _server_info { } sub _get_server_version { - shift->_get_dbh->get_info(18); + shift->_dbh_get_info(18); +} + +sub _dbh_get_info { + my ($self, $info) = @_; + + return try { $self->_get_dbh->get_info($info) } || undef; } sub _determine_driver {