X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FODBC%2FDB2_400_SQL.pm;h=10cfcc017e570670b4af1dc51275b3eae2a4db40;hb=584ea6e45cc0c7608789d3b6ea2d16151f15ed14;hp=d0eb5c9aadbb4cbfd336fc1b905aec5564ab43e3;hpb=2b8cc2f27d0dc881059e55dd6462bb28b7b8e414;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/lib/DBIx/Class/Storage/DBI/ODBC/DB2_400_SQL.pm b/lib/DBIx/Class/Storage/DBI/ODBC/DB2_400_SQL.pm index d0eb5c9..10cfcc0 100644 --- a/lib/DBIx/Class/Storage/DBI/ODBC/DB2_400_SQL.pm +++ b/lib/DBIx/Class/Storage/DBI/ODBC/DB2_400_SQL.pm @@ -28,7 +28,7 @@ sub _dbh_last_insert_id { # get the schema/table separator: # '.' when SQL naming is active # '/' when system naming is active - my $sep = $dbh->get_info(41); + my $sep = $self->_dbh_get_info(41); my $sth = $dbh->prepare_cached( "SELECT IDENTITY_VAL_LOCAL() FROM SYSIBM${sep}SYSDUMMY1", {}, 3); $sth->execute(); @@ -46,7 +46,7 @@ sub _sql_maker_opts { return { limit_dialect => 'FetchFirst', - name_sep => $dbh->get_info(41) + name_sep => $self->_dbh_get_info(41) }; }); }