Hello,

We had a problem because DBIx::Class::Schema::Loader did not get the
column_info for our Oracle database : no data_types, is_nullable, default
etc.. attributes were set.
We traced the problem down to
DBIx::Class::Schema::Loader::DBI::Oracle::_tables_list, that changed the
table names to lowercase.

So just commenting the line  69 : $table = lc $table;
seems to fix the problem.

The test is either to call the _tables_list and check the table names,
or to create a schema on a n oracle db using
DBIx::Class::Schema::Loader::make_schema_at, and to check that the generated
DBIx::Class objects have
the column attributes such as    data_type,  default_value , is_nullable ,
size etc...


Here are some details:
DBIx::Class::Schema::Loader $VERSION = '0.04004'
 perl, v5.8.8 built for i486-linux-gnu-thread-multi

diff:
--- Oracle.pm    2009-02-11 13:35:08.000000000 +0100
+++ Oracle.pm.fixed    2009-02-11 13:35:04.000000000 +0100
@@ -66,7 +66,7 @@
         $table =~ s/\w+\.//;

         next if $table eq 'PLAN_TABLE';
-        $table = lc $table;
+        # $table = lc $table; # removed by kf
         push @tables, $1
           if $table =~ /\A(\w+)\z/;
     }
_______________________________________________
List: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/dbix-class
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/DBIx-Class/
Searchable Archive: http://www.grokbase.com/group/[email protected]

Reply via email to