$field->comments($fdata->{comments});
$table->add_column($field);
- $table->primary_key($field->name) if $fdata->{is_primary_key};
+ $field->is_primary_key(1) if $fdata->{is_primary_key};
for my $cdata ( @{ $fdata->{constraints} } ) {
next unless lc $cdata->{type} eq 'foreign_key';
$sql =~ s/\A\s+|\s+\z//g;
my $view = View->new({
name => $vinfo->{view_name},
+ fields => $vinfo->{fields},
sql => $sql,
});