DBIx-Class-Schema-Loader

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

          result_components_map, result_roles, result_roles_map, unique
          constraints, set_primary_key and table
        - rename result_component_map to result_components_map (old name still
          works)
        - fix accessor collision detection for methods from
          result_components_map components
        - add result_roles and result_roles_map options
        - fix for mysql rel detection in mixed-case tables on mixed-case
          filesystems (OSX and Windows)
        - support for DBD::Firebird
        - support for unicode Firebird data types
        - handle "use warnings FATAL => 'all';" in custom/external content
          (RT#59849)
        - for dynamic schemas, if the naming option is set, will automatically
          turn on use_namespaces=1 as well. Set use_namespaces=0 to disable
          this behavior (RT#59849)

0.07010  2011-03-04 08:26:31
        - add result_component_map option

0.07009  2011-02-25 11:06:51

lib/DBIx/Class/Schema/Loader/DBI/InterBase.pm  view on Meta::CPAN

                    $info->{data_type} = 'bigint';
                }
            }
            # ODBC makes regular blobs sub_type blr
            elsif ($type_name eq 'BLOB') {
                if ($sub_type_name eq 'BINARY') {
                    $info->{data_type} = 'blob';
                }
                elsif ($sub_type_name eq 'TEXT') {
                    if (defined $char_set_id && $char_set_id == 3) {
                        $info->{data_type} = 'blob sub_type text character set unicode_fss';
                    }
                    else {
                        $info->{data_type} = 'blob sub_type text';
                    }
                }
            }
        }

        $data_type = $info->{data_type};

lib/DBIx/Class/Schema/Loader/DBI/InterBase.pm  view on Meta::CPAN

            # the constant is just in case, the query should pick up the type
            $info->{data_type} = 'bigint';
        }

        $data_type = $info->{data_type};

        if ($data_type =~ /^(?:char|varchar)\z/) {
            $info->{size} = $char_length;

            if (defined $char_set_id && $char_set_id == 3) {
                $info->{data_type} .= '(x) character set unicode_fss';
            }
        }
        elsif ($data_type !~ /^(?:numeric|decimal)\z/) {
            delete $info->{size};
        }

# get default
        delete $info->{default_value} if $info->{default_value} && $info->{default_value} eq 'NULL';

        $sth = $self->dbh->prepare(<<'EOF');

t/10_09firebird_common.t  view on Meta::CPAN

        # Date and Time Types
        'date'        => { data_type => 'date' },
        'timestamp default current_timestamp'
                      => { data_type => 'timestamp', default_value => \'current_timestamp' },
        'time'        => { data_type => 'time' },

        # String Types
        'char'         => { data_type => 'char',      size => 1  },
        'char(11)'     => { data_type => 'char',      size => 11 },
        'varchar(20)'  => { data_type => 'varchar',   size => 20 },
        'char(22) character set unicode_fss' =>
                       => { data_type => 'char(x) character set unicode_fss', size => 22 },
        'varchar(33) character set unicode_fss' =>
                       => { data_type => 'varchar(x) character set unicode_fss', size => 33 },

        # Blob types
        'blob'        => { data_type => 'blob' },
        'blob sub_type text'
                      => { data_type => 'blob sub_type text' },
        'blob sub_type text character set unicode_fss'
                      => { data_type => 'blob sub_type text character set unicode_fss' },
    },
    extra => {
        count  => 11,
        create => [
            q{
                CREATE TABLE "Firebird_Loader_Test1" (
                    "Id" INTEGER NOT NULL PRIMARY KEY,
                    "Foo" INTEGER DEFAULT 42
                )
            },