[Bast-commits] r4764 - DBIx-Class/0.08/branches/view_support/lib/SQL/Translator/Parser/DBIx

[groditi at dev.catalyst.perl.org]

Author: groditi
Date: 2008-08-23 21:23:18 +0100 (Sat, 23 Aug 2008)
New Revision: 4764

Modified:
   DBIx-Class/0.08/branches/view_support/lib/SQL/Translator/Parser/DBIx/Class.pm
Log:
oops

Modified: DBIx-Class/0.08/branches/view_support/lib/SQL/Translator/Parser/DBIx/Class.pm
===================================================================
--- DBIx-Class/0.08/branches/view_support/lib/SQL/Translator/Parser/DBIx/Class.pm	2008-08-23 20:20:56 UTC (rev 4763)
+++ DBIx-Class/0.08/branches/view_support/lib/SQL/Translator/Parser/DBIx/Class.pm	2008-08-23 20:23:18 UTC (rev 4764)
@@ -239,13 +239,13 @@
         # Its possible to have multiple DBIC source using same table
         next if $seen_tables{$source->name}++;
 
-        my $view = $sqlt->add_view(
+        my $view = $schema->add_view(
           name => $source->name,
           fields => [ $source->columns ],
           ($source->view_definition ? $source->view_definition : ())
         );
         if ($source->result_class->can('sqlt_deploy_hook')) {
-          $source->result_class->sqlt_deploy_hook($table);
+          $source->result_class->sqlt_deploy_hook($view);
         }
     }