[Bast-commits] r6562 - in branches/DBIx-Class-Schema-Loader/current: . lib/DBIx/Class/Schema/Loader

[caelum at dev.catalyst.perl.org]

Author: caelum
Date: 2009-06-09 13:25:36 +0000 (Tue, 09 Jun 2009)
New Revision: 6562

Modified:
   branches/DBIx-Class-Schema-Loader/current/
   branches/DBIx-Class-Schema-Loader/current/Changes
   branches/DBIx-Class-Schema-Loader/current/lib/DBIx/Class/Schema/Loader/DBI.pm
Log:
 r4529 at hlagh (orig r6424):  caelum | 2009-05-25 15:51:08 -0700
 add patch from semifor to use ->get_info for quote_char/name_sep by default



Property changes on: branches/DBIx-Class-Schema-Loader/current
___________________________________________________________________
Name: svk:merge
   - 46bc3436-8211-0410-8564-d96f7a728040:/local/DBIx-Class-Schema-Loader/branches/common-dump:37173
bd8105ee-0ff8-0310-8827-fb3f25b6796d:/branches/DBIx-Class-Schema-Loader/odbc-mssql:6423
bd8105ee-0ff8-0310-8827-fb3f25b6796d:/trunk/DBIx-Class-Schema-Loader:5726
   + 46bc3436-8211-0410-8564-d96f7a728040:/local/DBIx-Class-Schema-Loader/branches/common-dump:37173
bd8105ee-0ff8-0310-8827-fb3f25b6796d:/branches/DBIx-Class-Schema-Loader/odbc-mssql:6424
bd8105ee-0ff8-0310-8827-fb3f25b6796d:/trunk/DBIx-Class-Schema-Loader:5726

Modified: branches/DBIx-Class-Schema-Loader/current/Changes
===================================================================
--- branches/DBIx-Class-Schema-Loader/current/Changes	2009-06-09 13:25:06 UTC (rev 6561)
+++ branches/DBIx-Class-Schema-Loader/current/Changes	2009-06-09 13:25:36 UTC (rev 6562)
@@ -1,5 +1,8 @@
 Revision history for Perl extension DBIx::Class::Schema::Loader
 
+	- use $dbh->get_info(29/41) for qote_car/name_sep if available(semifor)
+	- add MSSQL support through DBD::ODBC
+
 0.04999_08 Not Yet Released
         - Replace UNIVERSAL::require with Class::C3::Componentised
 

Modified: branches/DBIx-Class-Schema-Loader/current/lib/DBIx/Class/Schema/Loader/DBI.pm
===================================================================
--- branches/DBIx-Class-Schema-Loader/current/lib/DBIx/Class/Schema/Loader/DBI.pm	2009-06-09 13:25:06 UTC (rev 6561)
+++ branches/DBIx-Class-Schema-Loader/current/lib/DBIx/Class/Schema/Loader/DBI.pm	2009-06-09 13:25:36 UTC (rev 6562)
@@ -46,12 +46,12 @@
     }
 
     # Set up the default quoting character and name seperators
-    $self->{_quoter} = $self->schema->storage->sql_maker->quote_char
-                    || $dbh->get_info(29)
+    $self->{_quoter} = $dbh->get_info(29)
+                    || $self->schema->storage->sql_maker->quote_char
                     || q{"};
 
-    $self->{_namesep} = $self->schema->storage->sql_maker->name_sep
-                     || $dbh->get_info(41)
+    $self->{_namesep} = $dbh->get_info(41)
+                     || $self->schema->storage->sql_maker->name_sep
                      || q{.};
 
     # For our usage as regex matches, concatenating multiple quoter