2 class SQL::Translator::Object::Column {
3 use MooseX::Types::Moose qw(ArrayRef Bool HashRef Int Maybe Str);
4 use MooseX::MultiMethods;
5 use SQL::Translator::Types qw(ColumnSize Constraint Table Trigger);
6 extends 'SQL::Translator::Object';
27 has 'sql_data_type' => (
40 has 'is_nullable' => (
47 has 'default_value' => (
52 has 'is_auto_increment' => (
59 has 'is_primary_key' => (
65 has 'is_foreign_key' => (
71 has 'foreign_key_reference' => (
88 $self->$orig(@args) if @args;
89 my @sizes = $self->$orig;
90 return wantarray ? @sizes