[Bast-commits] r8054 -
DBIx-Class/0.08/branches/mssql_rno_pagination/lib/DBIx/Class/Storage/DBI/ODBC
caelum at dev.catalyst.perl.org
caelum at dev.catalyst.perl.org
Wed Dec 9 15:12:56 GMT 2009
Author: caelum
Date: 2009-12-09 15:12:56 +0000 (Wed, 09 Dec 2009)
New Revision: 8054
Modified:
DBIx-Class/0.08/branches/mssql_rno_pagination/lib/DBIx/Class/Storage/DBI/ODBC/Microsoft_SQL_Server.pm
Log:
fix _get_mssql_version for ODBC
Modified: DBIx-Class/0.08/branches/mssql_rno_pagination/lib/DBIx/Class/Storage/DBI/ODBC/Microsoft_SQL_Server.pm
===================================================================
--- DBIx-Class/0.08/branches/mssql_rno_pagination/lib/DBIx/Class/Storage/DBI/ODBC/Microsoft_SQL_Server.pm 2009-12-09 10:25:09 UTC (rev 8053)
+++ DBIx-Class/0.08/branches/mssql_rno_pagination/lib/DBIx/Class/Storage/DBI/ODBC/Microsoft_SQL_Server.pm 2009-12-09 15:12:56 UTC (rev 8054)
@@ -175,6 +175,14 @@
}
}
+sub _get_mssql_version {
+ my $self = shift;
+
+ my ($version) = $self->_get_dbh->get_info(18) =~ /^(\d+)/;
+
+ return $version;
+}
+
1;
=head1 AUTHOR
More information about the Bast-commits
mailing list