From: Matt S Trout <mst@shadowcat.co.uk>
Date: Thu, 19 Apr 2007 02:29:05 +0000 (+0000)
Subject: reverting r3173, already implemented in -current
X-Git-Tag: v0.08010~163
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=deb6ee7f4059e0df6bc0fe633aea550ed57928b2;p=dbsrgits%2FDBIx-Class.git

reverting r3173, already implemented in -current
---

diff --git a/lib/DBIx/Class/Schema.pm b/lib/DBIx/Class/Schema.pm
index 3418f85..3ab14fd 100644
--- a/lib/DBIx/Class/Schema.pm
+++ b/lib/DBIx/Class/Schema.pm
@@ -744,10 +744,6 @@ See L<SQL::Translator/METHODS> for a list of values for C<$sqlt_args>. The most
 common value for this would be C<< { add_drop_table => 1, } >> to have the SQL
 produced include a DROP TABLE statement for each table created.
 
-C<source_names> can also be added to C<$sqlt_args> containing an array
-reference of L<source> names of tables to be deployed. Per default,
-all tables are deployed.
-
 =cut
 
 sub deploy {
diff --git a/lib/SQL/Translator/Parser/DBIx/Class.pm b/lib/SQL/Translator/Parser/DBIx/Class.pm
index 69782e5..d8af4d6 100644
--- a/lib/SQL/Translator/Parser/DBIx/Class.pm
+++ b/lib/SQL/Translator/Parser/DBIx/Class.pm
@@ -42,10 +42,11 @@ sub parse {
 
 #    print Dumper($dbixschema->registered_classes);
 
+    #foreach my $tableclass ($dbixschema->registered_classes)
+
     my %seen_tables;
 
-    my @sources = exists $args->{'source_names'} ? @{ $args->{'source_names'} } : $dbixschema->sources;
-    foreach my $moniker (@sources)
+    foreach my $moniker ($dbixschema->sources)
     {
         #eval "use $tableclass";
         #print("Can't load $tableclass"), next if($@);