-package DBIx::Class::Storage::DBI::MSSQL;\r
+package DBIx::Class::Storage::DBI::MSSQL;
\r
-use strict;\r
-use warnings;\r
+use strict;
+use warnings;
\r
-use base qw/DBIx::Class::Storage::DBI/;\r
+use base qw/DBIx::Class::Storage::DBI/;
\r
-# __PACKAGE__->load_components(qw/PK::Auto/);\r
+# __PACKAGE__->load_components(qw/PK::Auto/);
\r
-sub last_insert_id {\r
- my( $id ) = $_[0]->_dbh->selectrow_array('SELECT @@IDENTITY' );\r
- return $id;\r
-}\r
+sub last_insert_id {
+ my( $id ) = $_[0]->_dbh->selectrow_array('SELECT @@IDENTITY' );
+ return $id;
+}
\r
-1;\r
+1;
\r
-=head1 NAME \r
+=head1 NAME
\r
-DBIx::Class::Storage::DBI::MSSQL - Automatic primary key class for MSSQL\r
+DBIx::Class::Storage::DBI::MSSQL - Automatic primary key class for MSSQL
\r
-=head1 SYNOPSIS\r
+=head1 SYNOPSIS
\r
- # In your table classes\r
- __PACKAGE__->load_components(qw/PK::Auto Core/);\r
- __PACKAGE__->set_primary_key('id');\r
+ # In your table classes
+ __PACKAGE__->load_components(qw/PK::Auto Core/);
+ __PACKAGE__->set_primary_key('id');
\r
-=head1 DESCRIPTION\r
+=head1 DESCRIPTION
\r
-This class implements autoincrements for MSSQL.\r
+This class implements autoincrements for MSSQL.
\r
-=head1 AUTHORS\r
+=head1 AUTHORS
\r
-Brian Cassidy <bricas@cpan.org>\r
+Brian Cassidy <bricas@cpan.org>
\r
-=head1 LICENSE\r
+=head1 LICENSE
\r
-You may distribute this code under the same terms as Perl itself.\r
+You may distribute this code under the same terms as Perl itself.
\r
-=cut\r
+=cut