projects
/
dbsrgits/SQL-Translator-2.0-ish.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
primary key fix for YAML
[dbsrgits/SQL-Translator-2.0-ish.git]
/
lib
/
SQL
/
Translator
/
Parser
/
DDL
/
YAML.pm
diff --git
a/lib/SQL/Translator/Parser/DDL/YAML.pm
b/lib/SQL/Translator/Parser/DDL/YAML.pm
index
52ad3d0
..
74b28cc
100644
(file)
--- a/
lib/SQL/Translator/Parser/DDL/YAML.pm
+++ b/
lib/SQL/Translator/Parser/DDL/YAML.pm
@@
-46,7
+46,7
@@
role SQL::Translator::Parser::DDL::YAML {
my $column = Column->new($fdata);
$table->add_column($column);
- $table->primary_key($column->name) if $fdata->{is_primary_key};
+ $column->is_primary_key(1) if $fdata->{is_primary_key};
}
for my $idata ( @{ $tdata->{'indices'} || [] } ) {