[Bast-commits] r4093 - in DBIx-Class-Fixtures/1.000/trunk: . lib/DBIx/Class

[captainL at dev.catalyst.perl.org]

Author: captainL
Date: 2008-02-21 13:54:59 +0000 (Thu, 21 Feb 2008)
New Revision: 4093

Modified:
   DBIx-Class-Fixtures/1.000/trunk/Makefile.PL
   DBIx-Class-Fixtures/1.000/trunk/lib/DBIx/Class/Fixtures.pm
Log:
fixed namespace bug and updated deps

Modified: DBIx-Class-Fixtures/1.000/trunk/Makefile.PL
===================================================================
--- DBIx-Class-Fixtures/1.000/trunk/Makefile.PL	2008-02-21 08:37:02 UTC (rev 4092)
+++ DBIx-Class-Fixtures/1.000/trunk/Makefile.PL	2008-02-21 13:54:59 UTC (rev 4093)
@@ -10,13 +10,16 @@
     PREREQ_PM => {
         'Test::More' => 0.7,
         'DBIx::Class' => 0.08,
+        'Data::Visitor' => 0.15,
+        'File::Copy::Recursive' => 0.35,
+        'DateTime' => 0.41,
+        'DBIx::Class::Schema::Loader' => 0.04004,
         'Class::Accessor::Grouped' => 0.06,
         'Path::Class' => 0.16,
         'Config::Any' => 0.08,
         'JSON::Syck' => 0.26,
         'Data::Dump::Streamer' => 2.05,
         'Hash::Merge' => 0.10,
-        'DBD::SQLite' => 1.14,
     },
     dist                => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
     clean               => { FILES => 'DBIx-Class-Fixtures-*' },

Modified: DBIx-Class-Fixtures/1.000/trunk/lib/DBIx/Class/Fixtures.pm
===================================================================
--- DBIx-Class-Fixtures/1.000/trunk/lib/DBIx/Class/Fixtures.pm	2008-02-21 08:37:02 UTC (rev 4092)
+++ DBIx-Class-Fixtures/1.000/trunk/lib/DBIx/Class/Fixtures.pm	2008-02-21 13:54:59 UTC (rev 4093)
@@ -664,8 +664,10 @@
   $self->msg("- finished importing DDL into DB");
 
   # load schema object from our new DB
-  $self->msg("- loading fresh DBIC object from DB");
-  my $schema = $namespace->connect(@{$connection_details});
+  $namespace_counter++;
+  my $namespace2 = "DBIx::Class::Fixtures::GeneratedSchema_" . $namespace_counter;
+  Class::C3::Componentised->inject_base( $namespace2 => $schema_class );
+  my $schema = $namespace2->connect(@{$connection_details});
   return $schema;
 }