Forgot about multi column indexes and names having columns suddenly... (

#5)
tnosaj · Apr 14, 2021 · cd1f1db · cd1f1db
1 parent 65be25d
commit cd1f1db
Showing 1 changed file with 5 additions and 3 deletions.
diff --git a/lib/MySQL/Diff/Table.pm b/lib/MySQL/Diff/Table.pm
@@ -229,9 +229,11 @@ sub _parse {
 
         if (/^(KEY|UNIQUE(?: KEY)?)\s+(\S+?)(?:\s+USING\s+(?:BTREE|HASH|RTREE))?\s*\((.*)\)(?:\s+USING\s+(?:BTREE|HASH|RTREE))?$/) {
             my ($type, $key, $val) = ($1, $2, $3);
-            $self->{indices}{$val} = $val;
-            $self->{unique}{$val} = 1   if($type =~ /unique/i);
-            debug(4, "got ", defined $self->{unique}{$val} ? 'unique ' : '', "index key '$val': ($val)");
+            my $indexName = $val;
+            $indexName =~ tr/,/_/;
+            $self->{indices}{$indexName} = $val;
+            $self->{unique}{$indexName} = 1   if($type =~ /unique/i);
+            debug(4, "got ", defined $self->{unique}{$indexName} ? 'unique ' : '', "index key '$indexName': ($val)");
             next;
         }