[Bast-commits] r7658 - DBIx-Class/0.08/branches/sybase/lib/DBIx/Class/Storage

[caelum at dev.catalyst.perl.org]

Author: caelum
Date: 2009-09-14 13:48:52 +0000 (Mon, 14 Sep 2009)
New Revision: 7658

Modified:
   DBIx-Class/0.08/branches/sybase/lib/DBIx/Class/Storage/DBI.pm
Log:
remove @args from DBI::sth, use full arg list

Modified: DBIx-Class/0.08/branches/sybase/lib/DBIx/Class/Storage/DBI.pm
===================================================================
--- DBIx-Class/0.08/branches/sybase/lib/DBIx/Class/Storage/DBI.pm	2009-09-14 13:44:06 UTC (rev 7657)
+++ DBIx-Class/0.08/branches/sybase/lib/DBIx/Class/Storage/DBI.pm	2009-09-14 13:48:52 UTC (rev 7658)
@@ -2078,8 +2078,8 @@
 }
 
 sub sth {
-  my ($self, $sql, @args) = @_;
-  $self->dbh_do('_dbh_sth', $sql, @args);  # retry over disconnects
+  my ($self, $sql, $op, $sth_attr) = @_;
+  $self->dbh_do('_dbh_sth', $sql, $op, $sth_attr);  # retry over disconnects
 }
 
 sub _dbh_columns_info_for {