I believe I fixed the problem (cf my post "bug found in and tentatively
fixed in DBIx::Class::Schema::Loader::DBI::Oracle::_tables_list" in the dbix
mailing list").

Here's a copy :

> 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: [email protected]
Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst
Searchable archive: http://www.mail-archive.com/[email protected]/
Dev site: http://dev.catalyst.perl.org/

Reply via email to