From: Rafael Kitover Date: Sat, 23 May 2009 21:04:01 +0000 (+0000) Subject: minor clean up X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=90ffec0de94ef07d45cbe73877032c689476fb4e;p=dbsrgits%2FDBIx-Class-Historic.git minor clean up --- diff --git a/lib/DBIx/Class/Storage/DBI/Sybase.pm b/lib/DBIx/Class/Storage/DBI/Sybase.pm index 0c18d6b..ec4fcf7 100644 --- a/lib/DBIx/Class/Storage/DBI/Sybase.pm +++ b/lib/DBIx/Class/Storage/DBI/Sybase.pm @@ -20,8 +20,8 @@ sub _rebless { } sub _dbh_last_insert_id { - my $self = shift; - ($self->_dbh->selectrow_array('select @@identity'))[0]; + my ($self, $dbh, $source, $col) = @_; + return ($dbh->selectrow_array('select @@identity'))[0]; } 1;