PT-200 Index with keyword 'unique'

This commit is contained in:
Carlos Salguero
2017-09-25 15:16:14 -03:00
parent 95bfe7abaf
commit 4c15a39784
3 changed files with 74 additions and 4 deletions

View File

@@ -10111,7 +10111,7 @@ sub get_unique_index_fields {
$clean .= $suffix;
my $fields = [];
my $fields_re = qr/(?:PRIMARY|UNIQUE)\s*(?:INDEX|KEY|)\s*(?:.*?)\s*\((.*?)\)/i;
my $fields_re = qr/\s(?:PRIMARY|UNIQUE)\s+(?:INDEX|KEY|)\s*(?:.*?)\s*\((.*?)\)/i;
while($clean =~ /$fields_re/g) {
push @$fields, [ split /\s*,\s*/, $1 ];