diff --git a/lib/SQL/Translator/Producer/MySQL.pm b/lib/SQL/Translator/Producer/MySQL.pm index 1f8c541d6..9905b8a18 100644 --- a/lib/SQL/Translator/Producer/MySQL.pm +++ b/lib/SQL/Translator/Producer/MySQL.pm @@ -731,7 +731,7 @@ sub create_constraint my $reference_table_name = quote_table_name($c->reference_table, $qt); - my @fields = $c->fields or next; + my @fields = $c->fields or return; if ( $c->type eq PRIMARY_KEY ) { return 'PRIMARY KEY (' . $qf . join("$qf, $qf", @fields). $qf . ')';