X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FODBC%2FMicrosoft_SQL_Server.pm;h=911ca48d353063313c119e31ec3c6afa584219a5;hb=56ad42bb48befbeb50953d197e7cb86bbc62686c;hp=662acb4f396d5dbd5ffe124923dee661c8464210;hpb=a5280453bd7fc86157fb4a84a451bddc2c408bf7;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/Storage/DBI/ODBC/Microsoft_SQL_Server.pm b/lib/DBIx/Class/Storage/DBI/ODBC/Microsoft_SQL_Server.pm index 662acb4..911ca48 100644 --- a/lib/DBIx/Class/Storage/DBI/ODBC/Microsoft_SQL_Server.pm +++ b/lib/DBIx/Class/Storage/DBI/ODBC/Microsoft_SQL_Server.pm @@ -24,7 +24,7 @@ to Microsoft SQL Server over ODBC =head1 DESCRIPTION This class implements support specific to Microsoft SQL Server over ODBC. It is -loaded automatically by by DBIx::Class::Storage::DBI::ODBC when it detects a +loaded automatically by DBIx::Class::Storage::DBI::ODBC when it detects a MSSQL back-end. Most of the functionality is provided from the superclass @@ -143,7 +143,7 @@ sub connect_call_use_mars { } if (my ($data_source) = $dsn =~ /^dbi:ODBC:([\w-]+)\z/i) { # prefix with DSN - warn "Bare DSN in ODBC connect string, rewriting as 'dsn=$data_source'" + carp_unique "Bare DSN in ODBC connect string, rewriting as 'dsn=$data_source'" ." for MARS\n"; $dsn = "dbi:ODBC:dsn=$data_source"; }