[Bast-commits] r7152 -
DBIx-Class/0.08/branches/mssql_storage_minor_refactor/lib/DBIx/Class/Storage/DBI
caelum at dev.catalyst.perl.org
caelum at dev.catalyst.perl.org
Thu Jul 30 17:00:40 GMT 2009
Author: caelum
Date: 2009-07-30 17:00:40 +0000 (Thu, 30 Jul 2009)
New Revision: 7152
Modified:
DBIx-Class/0.08/branches/mssql_storage_minor_refactor/lib/DBIx/Class/Storage/DBI/MSSQL.pm
Log:
fix syntax error
Modified: DBIx-Class/0.08/branches/mssql_storage_minor_refactor/lib/DBIx/Class/Storage/DBI/MSSQL.pm
===================================================================
--- DBIx-Class/0.08/branches/mssql_storage_minor_refactor/lib/DBIx/Class/Storage/DBI/MSSQL.pm 2009-07-30 16:57:22 UTC (rev 7151)
+++ DBIx-Class/0.08/branches/mssql_storage_minor_refactor/lib/DBIx/Class/Storage/DBI/MSSQL.pm 2009-07-30 17:00:40 UTC (rev 7152)
@@ -129,7 +129,7 @@
my ($identity) = $sth->fetchrow_array;
$sth->finish;
- if ((not defined $identity) && $self->_identity_method)
+ if ((not defined $identity) && $self->_identity_method) {
($identity) = $self->_dbh->selectrow_array(
'select ' . $self->_identity_method
);
More information about the Bast-commits
mailing list