Skip to content

Commit

Permalink
Issue #12: restore compatibility to MySQL pre-5.5 servers, which have…
Browse files Browse the repository at this point in the history
… no "Index_comment" column in IS.columns
  • Loading branch information
ansgarbecker committed Jan 9, 2020
1 parent b45a0d5 commit 16b81ab
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion source/dbconnection.pas
Expand Up @@ -4822,7 +4822,7 @@ function TMySQLConnection.GetTableKeys(Table: TDBObject): TTableKeyList;
// Todo: fulltext and spatial keys // Todo: fulltext and spatial keys
NewKey.OldIndexType := NewKey.IndexType; NewKey.OldIndexType := NewKey.IndexType;
NewKey.Algorithm := KeyQuery.Col('Index_type'); NewKey.Algorithm := KeyQuery.Col('Index_type');
NewKey.Comment := KeyQuery.Col('Index_comment'); NewKey.Comment := KeyQuery.Col('Index_comment', True);
end; end;
NewKey.Columns.Add(KeyQuery.Col('Column_name')); NewKey.Columns.Add(KeyQuery.Col('Column_name'));
NewKey.SubParts.Add(KeyQuery.Col('Sub_part')); NewKey.SubParts.Add(KeyQuery.Col('Sub_part'));
Expand Down

0 comments on commit 16b81ab

Please sign in to comment.