X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FSybase%2FCommon.pm;h=af4c916f7564e58b1d82062ea2599067f14ad098;hb=48a76fcfd023d2149f6980bd9a7bdc4937dbc4fc;hp=c83398fc0ae967d957498ebb007c7bb14d435c97;hpb=322b7a6bb9b1c41935395b8fe809f2c36ac945dd;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/Storage/DBI/Sybase/Common.pm b/lib/DBIx/Class/Storage/DBI/Sybase/Common.pm index c83398f..af4c916 100644 --- a/lib/DBIx/Class/Storage/DBI/Sybase/Common.pm +++ b/lib/DBIx/Class/Storage/DBI/Sybase/Common.pm @@ -29,7 +29,6 @@ sub _ping { local $dbh->{RaiseError} = 1; local $dbh->{PrintError} = 0; - local $@; if ($dbh->{syb_no_child_con}) { # ping is impossible with an active statement, we return false if so @@ -72,7 +71,7 @@ the Sybase OpenClient libraries were used. sub using_freetds { my $self = shift; - return $self->_dbh->{syb_oc_version} =~ /freetds/i; + return $self->_get_dbh->{syb_oc_version} =~ /freetds/i; } =head2 set_textsize