existing Loader patchwork for Schema support, module not fully renamed yet

[dbsrgits/DBIx-Class-Schema-Loader.git] / lib / DBIx / Class / Loader / Writing.pm

diff --git a/lib/DBIx/Class/Loader/Writing.pm b/lib/DBIx/Class/Loader/Writing.pm
index 7d1a10f..5fd54f3 100644 (file)
--- a/lib/DBIx/Class/Loader/Writing.pm
+++ b/lib/DBIx/Class/Loader/Writing.pm
@@ -26,8 +26,7 @@ DBIx::Class::Loader::Writing - Loader subclass writing guide
 
   sub _tables {
       my $self = shift;
-      my $dbh = DBI->connect( @{ $self->{_datasource} } )
-           or croak($DBI::errstr);
+      my $dbh = $self->{_storage}->dbh;
       return $dbh->tables; # Your DBD may need something different
   }