[Dbix-class] bug found in and tentatively fixed in DBIx::Class::Schema::Loader::DBI::Oracle::_tables_list

[Karl Forner]

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 =3D 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 =3D '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 =3D~ s/\w+\.//;

         next if $table eq 'PLAN_TABLE';
-        $table =3D lc $table;
+        # $table =3D lc $table; # removed by kf
         push @tables, $1
           if $table =3D~ /\A(\w+)\z/;
     }
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.scsys.co.uk/pipermail/dbix-class/attachments/20090211/501=
96ae3/attachment.htm